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ド GZ _611 C - GY (グレー). - BK (ブラック)標準価格 399,800 円 \ 

•、型カラーディスプレイテレビ(ドットヒ’ッチ 0 . 39 m ^ CZiOW - GY (グレー ) .-BK (ブラック）棟準価格 119 , 800 円 
_! 5 型カラーデ f スブレイテレビ(ドットビッチ, 0 . 3 !_) CZ : 6 ” D ‘ GY (グレー)標準価格！ 45,000 円，. 

_チルトスタンド GZ - 6ST 卜 E (グレー） 一 B (ブラック） mm 価格 5 , 800 円 
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ますます熱くなる 0 

クリエイテイブワ - クステ - シヨン X 68000。 



•新たな ゆとりが創造力を刺激する——〇 20 M 
バ仆ハードデ:(スタを本体に内蔵した X 68000 
ACEH 0 の登場です。もちろん、 X 68000 として 
の本質は変わるはずもなく、あのクリェイティブな 
X 68000 そのものです。といって、たとえ 3.5 インチの 

ハードデ f スタとはいえ、それをスリムなマンハッタン 
シェイプの本体内に搭載するには、これまで以上 
の実装密度が要求されます。このハードデ f スク 
モデ、ルには、集積度をさらに高めたカスタム 1 C や、 
メモリ a で 1 M ビットのダイナミック RAM が採用 
されていますが、これは、いわば過去1年間の成 
果というべきものて、’、ある意味では、ビジユアノレシェ 
ルなどのソフトウェアに対 U ： ハードウェアのユー 
ザーインターフェイスとも言えるでしよう。 

) 約 110 本、 X 68000 のハ 0 フォー マンスにふさわし 
いさまざまなジャンルのソフトウェアがすでに流通。 
このマシンの ソフト環境は着実な歩みを見せて 
います。この間、ユーザー各位の熱烈なご支持と 
システムハウス 各位の開発ご努力に心からの感 
謝をささげるとともに、そうしたご厚意に対して、私た 
ちは将来的な展望も含めて、でき得るかぎりのサ 
ポートをお約束するものです。 


豊富な周辺機器がクリ • 

• 15型カラーディスプレイ 
籲カラーイメージスキャナ*^ 

參カラーイメージユニット* 2 
♦カラービデオプリンタ 

• 24 ビン漢字プリンタ （80 桁） 

籲24ヒン漢字プリンタ （136 桁） 

• 24 ピン漢字プリンタ （80 桁） 

籲熱転写カラー澳字プリンタ 
•ハードディスクユニット （20MB) 
•モデムユニット* 3 

參 RS -232 C ケーブル(平行接続型） 


，エイティつ 

CU-15M 


1 -E 
CZ -8 NS 1 
CZ -6 VT 1 
CZ -6 PV 1 
CZ -8 PK 7 
CZ -8 PK 8 
CZ -8 PK 9 
CZ -8 PC 2 
CZ -620 H 
CZ -8 TM 2 
CZ -8 LM 1 


• RS -232 C ケーブル（クロス接統型） CZ -8 LM 2 

争拡張 I / O ボックス （4 スロット） CZ -6 EB 1 

• 1 MB 增設 RAM ボード(内蔵用） CZ -6 BE 1 A 
籲 2 MB 增言殳 RAM ボード* 4 CZ -6 BE 2 

• 4 MB 增 I 殳 RAM ボード糸 4 CZ -6 BE 4 

• GP - 旧ボード CZ -6 BG 1 

•ユニバーサル I / O ボード CZ -6 BU 1 

• 增設用 RS -232 C ポード (2 チャンネル） CZ -6 BF 1 
• 数値演算フロセッサボード CZ -6 BP 1 

參スキャナ用パラレルボード CZ -6 BN 1 

参システムラック CZ -6 SD 1 

• アンプ 内银スビーカーシステム (2 本1組） AN -160 SP 
♦ジョイカード CZ -8 NJ 1 


ブワークをサポート 0 

標準価格99,800円 
標準価格188,000円 
標準価格69,800円 
標準価格198,000円 
標準価格122,000円 
標準価格152,000円 
標準価格89,800円 
標準価格69,800円 
棵準価格178,000円 
標準価格49,800円 
標準価格7,200円 
摞準価格7,200円 
標準価格88,000円 
標準価格38,000円 
標準価格79,800円 
標準価格138,000円 
標準価格59,800円 
標準価格39,800円 
標準価格49,800円 
標準価格79,800円 
標準価格29,800円 
標準価格44,800円 
標準価格59,800円 
標準価格1,700円 


* 1使用に噤しては、カラーイメージスキャナ CZ -8 NSU こ同梱の RS -232 C ケーブルで接 H {する 
か、より*速のパラレルテータ転送を行う場合.別売のスキャナ用ハラレルポード CZ .6 BN I で接 
珩じ T ください..來2使用に際じ T はコンヒュータ本体と専用15型カラーディスフレイテレビ （ CZ - 
601 D 、 CZ -611 D など）が必要です.※3モデムユニット CZ -8 TM 2 に同梱のソフトは X 1/ X 丨 turbo 
シリーズ用です t ♦ 4使用に際じ H ムあらかじめ，別光の 1 MB 增 KRAM ポード CZ -6 BE 1 A を 
增15じ T ください. 



、 RO -68 Kj シリーズソフト。 
CZ -213 MS 摞準価格18,800円 


メ □ディ譜、ヒアノ譜、最大8ハートのスコア(総譜）を自由なレイアウトで害き込ん 
だ譜面を内蔵の FM 音源で演奏できる楽譜ワーフロ&演奏用ミュージッグ:/ール, 


く X 68000 ACE [ HDJ の主な特長〉 • 3_5インチ 20 M バイトタイフのハー 
ドディスク(平均アクセスタイム 80 ms ) を1基内蔵•実装密度を追求し 
て i 言頼性を高めたマンハッタンシエイブ • 68000搭載•テキスト、グラ 
フィック、スブライト、独立3画面設計、最大 12 M バイトの大容置メモリ 
(標準 1 M バイト）•フレンドリー OS、Human 68 k 搭載•連文節変換、 
マルチフォントをサポートした強力日本語処理春 1024 X 1024ドット（最 
大表示エリア768 X 512ドット）の実画面エリアを装備した高解像度表 
示能力參512 x 512ドット、65,536色同時発色泰水平32、1画面128の 
パワフルなスプライト機能•オーバースキャン機能を採用した 512 X 512 
ドットレベルのスーバーインポーズ•テキストビットマップ方式採用 • 8 
重和音ステレオ FM 音源搭載參音声デジタイズ記録 AD PCM * 採用 
•マウス•トラックポール標準装備 • 5インチ1 M バイト F DD 2 基搭載 
•「 X - BASICj 、 r 辞書ディスク」と各種ユーティリティ、「日本語ワード 
プロセッサ」をバンドル * Adaptive Differential PCM 


CZ -214 MS 標準価格15,800円 
FM 音源のバラメータを直接指定したり、エンべローフやビブラートを言葉による 
音のイメージ指定で思いどおりの音色が作成できるサウンドエディティングツール。 


BUSINESS PRO60K 


CZ -212 BS 樣準価格68,000円 


スプレッドシート、データペース、グラフ作成機能を緊密に一体化させた統合ビジネスツー 
ル。 マウス対応のイージー オペレーション、 最大16個のマルチウインドウが使えます 



CZ -211 LS 摞準価格39,800円 


C コンバイラ、 BASIC - C コンバータ、アセンブラ、リンカ,デバッガ、アーカイバ、コ 


ンバータで構成 。 Human 68 k 上におけるフ□グラム開発を効率良くサポートします 


くゲームソフト〉•ツインビー CZ -217 AS 摞準価格7,800円 
* アルカノイド CZ -222 AS 標準価格7,800円 


さらに洗練されて信頼性を高めた 

/、イコ スト/<フオーマンス FD モテル X ⑽〇〇 0 ACE 

SKBBOOO 

PERSONAL WORKSTATION 

ACE 


■本体+キ ー ボ—ド 

CZ -601 C-G Y (グ L ^ -；- BK (ブラツク)棵準価格319,800円 


写輿の15型カラーディスフレイテレビ CZ -601 D-GY (グレー） .- BK (ブラック）、 
チ/レトスタンド CZ -6 ST 1 -E (グ L ) • - B (ブラック）は別売です。 



く パソコン教室開催のお知らせ〉 X 68000、 MZ -286〗 のパソコン教室を開催します。くわしくは、下記までお問い合せください。 
札幔 (011)642-8111 •仙台 (022)288-8705 .東京 ((^ WeO - lie 1 .横浜 (045)201-6525 •名古屋 (052)332-2611 •大阪 (06)222-7655 •神 戸 (078)291-8715 .福 岡 (092)481-2860 



















表紙給 ： Matsubaguchi Tadao 


UNIX は AT&T BELL LABORATORIES の OS 名です。 

CP/M.P-CP/M.CP/M Plus. CP/M-86.CP/M-68K, 

CP/M- 800 0, C-DOS は DIGITAL RESEARCH 

XENIX. MS-DOS. Macro 80. OS/2 は MICROSOFT 

SONY Filer は SONY 

MSX-DOS はアスキー 

S1-OSJJMULTISOLUTIONS 

OS-9, OS-9/68000 は MICROWARE 

UCSD p-system はカリフォルニア大学理事会 

FLEXI1TSC 

Word Star. Word Master は MICRO PRO 

TURBO PASCAL, Sidekick は BORLAND INTERNATIO 

NAL 

LSI C は LSI JAPAN 
HuBASIC はハドソンソフト 
SUPER BASE. WICSIi キャリーラボ 
の商標です。その他プログラム名， CPU 名は 
一 w に各メーカーの ass 商標です，本文中では. 

"TM ” マークは 明記していません。 

本 K に掲載されたすベてのプ〇グラムは著作播法 
上，個人で使用するほかは無断複製することを禁 
じられています 3 
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SHARP 


クリエイテイブマインド 



儀' 




カラーイメージユニット * 

CZ -6 VT 1 
摞準 価格69,800円 


« 2/*2 
カラーイメージスキヤナ 

CZ -8 NS 1 

摞準価格 188,000円 

( RS -232 C ケーブル同梱） 



スキャナ用ハラレルポード 

CZ -6 BN 1 
標準価格29,800円 


モデムユニット*2/*4 

CZ -8 TM 2 
標準価格 49,800円 

( RS -232 C ケーブル同描〉 



RS -232 C ケーフ〇レ來2 

(平行接琦型） 

CZ -8 LM 1 

標準価格7；200円 * Sv 



RS -232 C ケーブル *2 
(クロス接続型） 

CZ -8 LM 2 
標準価格7,200円 




增設 RAM ポード*5 

CZ -6 BE 2 
標準価格 79,800円 


，-=： 

aSEagi 


4 MB 增設 RAM ボード* 5 

CZ -6 BE 4 
摞準価格138,000円 


纖_ 


ユニバーサル％ポード 

CZ -6 BU 1 
標準価格 39,800円 


GPHB ボード 

CZ -6 BG 1 
棵準価格 59,800円 


增股用 RS -232 C ポード 
(2 チヤンネル） 

CZ -6 BF 1 
標準価格 49,800円 


数偭演算フロセッサボード | 

CZ -6 BP 1 
標準価格79,800円 





ジョイカード 

CZ -8 NJ 1 
標準価格1,700円 




1 MB 增設 RAM ボード 
( CZ -600 C 内蔵用) 

CZ -6 BE 1 
標準価格35,000円 



1 MB 增設 RAM ボード 
( CZ -601 C /611 C 内蔵用) 

CZ -6 BE 1 A 
標準価格38,000円 


拡張, 1 もボックス 
(4 スロット） 

CZ -6 EB 1 

標準価格88,000円 


アンプ内臛 スピーカー システム 
(2 本 1 組) 

AN -160 SP 
標準価格 59,800円 



映像入力 
画像入力 


通信 



入力 



\\ \ \ \ 



• 本体十キーボード 


メモリ 


CZ -600 C - E--B 棵準価格369,000円 
CZ -601 C - GY--BK 標準価格319,800円 
CZ -611 C - GY--BK 標準価格399,800円 


115型カラーディスフレイテレビ 

CZ -600 D-E 摞準価格129,800円 

CZ -601 D - GY--BK 標準価格119,800円 
CZ -611 D-GY 標準価格145,000円 


參チルトスタンド 

CZ -6 ST 1- E--B 標準価格5,800円 

•写真は CZ -611 C / CZ -601 D / CZ -6 ST 1 てす 


拡張スロツト 


拡張ボード 


サウンド 


* 1 使用に際してはコンビユータ本体と専用15型カラーディスブレイ（〇2-601〇、〇2-611〇など）が必要です。*2 X 1/ X 1 ターボシリーズと 共用。 糸3ご使用に探して は、 カラーイメージ スキヤナ CZ -8 NS 1 に 同描の RS -232 C ケーブル 
さぃ 。浓 4モデムュ ニ, ント CZ -8 TM 2 に同梱のソフトは X 1/ X 1 ターボシリーズ用です。※5使用に 探して は、あらかじめ 別充の 1 MB 增設 RAM ボード CZ -6 BE 1 檷準価格35,000円 （ CZ -600 C ). GZ -6 BE 1 A 標準価格38,000円 


•お問い合わせは…シャープ ㈱ 電子機器事業本部 システム 機器営業部〒 545 大阪市阿倍野区長池町 22 番 22 号 0 ( 06 ) 62 卜 1221 (大代表)電子機器 









































思わず熱くなる0 

あふれる周辺機器が X 6 日000をサボート0 



シャープペリフエラルフアミリー 

XSG8000 



15型カラーテVスフレイ* 2 

CU -15 M 1 -E 
標準価格99,800円 


24ビン漢字ブリンタ (80 桁” 2 

CZ -8 PK 7 

棵準価格122,000円 

(信号ケーブル同梱） 


24ピン 漢字 ブリンタ(136桁)*^ 

CZ -8 PK 8 
棵準価格152,000円 

(信号ケーブル 同梱） 


24ビン漢字フリンタ (80 桁)* 2 

CZ -8 PK 9 
標準価格89,800円 
(信号ケーブル同梱） 


熱転写カラー漢字フリンタ 

CZ -8 PC 2 
標準価格69,800円 
(信号ケープル同梱） 


カラー ビデオフリンタ w 

CZ -6 PV 1 
標準価格198,000円 

(信号ケーブル同梱） 


八ードテイスク 


シスアムラック 



ハードディスクユニット （20MB) 

CZ -620 H 
摞準価格178,000円 


システムラック 

CZ -6 SD 1 
標準価格44,800円 


で接続するか、より高速のパラレルデータ伝送を行う場合、別売のスキャナ用パラレルポード CZ-6BNI 棵準価格29,800円で接続 U： くだ 
(CZ-601C、CZ-61IC) を增設してください。 


ファミリーの 


システムづくりに応える 


多彩な周辺機器群 


_映像編集装置 

籲カラーイメージスキャナ CZ-8NS 1188,000円 

•カラーイメージボードII CZ-8BV2 39,800円 

•立体映像セット CZ-8BR1 29,800円 

參ハーソナルテロッハ■レ 1 __ CZ-8DT2 44,800円 

_ _ プリンタ_| 

#24匕ン漢字フリンタ （80 桁） CZ-8PK5 129,000円 
•24 ビン漢字フリンタ （136 桁） CZ-8PK6 159,000円 
•ドットフリンタ_ CZ-8PD3 59,800円 

FM 咅源 

•ステレオタイプ FM 音源ボード CZ-8BS1 23,800円 

* スヒーカー （2 本 1 組） 漯準装備、ミュージックツール同梱 

ファイル装置 

#ミニフロンヒニ为スクユニット (2HD.2D)* 2 CZ-520F 118,000円 

_ミニフ□ッビ-テ; T スクユニ;/卜 (2D) CZ-502F 99,800円 

#ミニフ□ッヒ-デ f スクユニット (2D-1 ドライブ） CZ-503F 49,800円 
• ノ、ードテV スクユニット (10MB) CZ-500H348, 000円 

籲增設用ハードテVスクユニット (10MB) CZ-501H 258,000円 

•カセット データレコーダ CZ-8RL1 24,800円 

•ミニフロッピーデ f スク CZ-5M2D/CZ-5M2HD (各10枚入） 
❿コンパクトフロッビーテVスク CZ-3FBD 1,300円 


拡張ボード•その他 

• 320KB 外部メモリ 


CZ-8BE2 29,800円 

• RS-232C. マウスポード+ 3 


CZ-8BM2 19,800円 

• JIS 第1水準漢字 ROM + 4 


CZ-8BK2 

19,800円 

• JIS 第2水準漢字 ROM+ 5 


CZ-8BK4 

6,800円 

• JIS 第2水準漢字 ROM &ターボ博士レキシコン•日本語 
百科ワードパワー※ 6 CZ-8BK3 13,800円 

馨フロッピーテVスクインターフェイス※ 7 

CZ-8BF1 

14,800円 

• RS-232C 用ケーブル(平行接続型） 

CZ-8LM1 

7,200円 

籲 RS-232C 用ケーブル(クロス接続型） 

CZ-8LM2 

7,200円 

•拡張 I/O ポード" 8 


CZ-8EP 

11,800円 

•拡張 I/O ボックス 


CZ-8EB3 33,800円 

• RF コンパータ* 9 


AN-58C 

2,980円 

•モデムユニット (300 ボー） 


CZ-8TM1 

29,800円 

籲モテムユこット (300/1200 ボー自動切換） CZ-8TM2 49,800円 

•マウス 


CZ-8NM2 

6,800円 

•チルトスタンド‘ ;11 〇 

CZ-6STKE.B) 

5,800円 

籲チルトスタンド+ 11 

CZ-81T(S*R) 

8,500円 

籲システムスタンド 


CZ-8SS2 

5,500円 

•ジョイカード 


CZ-8NJ1 

1,700円 

參スキャナ用ハラレルボード+ 12 

CZ-8BN1 27,800円 


<価格は標爷価格で - f 。) 


• m 浪屮の （ けし は、 S くメタリック シルバー〉 .R く ローズ レッド〉 
•H： くオフイスグレー〉 .B くブラック〉をポします。※1 CZ-862C には 
怕絞できませんXI夕ーボシリーズ f|j ※: i XIシリーズ川 
※ィ CZ-800C\ 801C. 802C, 803C.811C.820CM! ^5 CZ 
H56C 川※6 CZ-850C、851C、852C 862Cllj *7 CZ- 85 0C 
で CZ- 520 F を使川する場合、また CZ-803C、804C、 81 1C. S20C. 
850C で CZ-300F を使する叫合に必要※8 CZ-800C.802C 
III «9CZ-820C：、822C、830aiI »10CZ_600D、601D、611I)、 
8 «0D、830DXU-15M1MI »11 CZ-801D, 802D.811D, 8501)、 
855D. 870DIIJ »12 CZ-8NS1 川鲁接较方の详細にっきまし 
ては、尚辺株器総介カタログをご参照ください。 


事業本部テレビ事業部第 4 商品企画部〒 162 東京都新宿区市谷八幡町 8 番地 S(03)260-1161( 大代表) 








































































SHARP 


MZ の新 U ツフト環境 


日本語ワードプロセッサ「書院 28 」の搭載、「 MS - D 0 S ™ V 3.1 j の標準装備、 
市販アプリケーション活用のための「エミュレーションソフト」の搭載… 
数々のソフトウェア上の特長を持つ MZ -2861に、 L 、ま新たな システム 展開。 


0 A ゾフトウエア 
UP シリーズ 


これからの企画書、提案書作りに新し L 、〇 A ツーノ ％ 

MZ -2861 の日本語入力機能を有機的に活かす統合 OA ソフトウェア 「UP シリーズ」の登場で 1"。デスクトップ 
パブリツシングという新しい ジャンルのレイアウトワープロ、 集計表•グラフ作成統合 ソフトウェア、 自由度の高い力一 
ド型データベース、 アウトラインプロセッサ という ジャンノレの 新しい企画書作成 ソフトウェア…。オフィスワークを代表 
的な 4 つの局面からアプローチして専門化した OA ツールです。「パソコンファクス 28」 とのリンクも可能。 




日本語レイアウトワープロ ■デスク UP ( IP -1251) 標準価格88,000円 
集計表•グラフ作成ソフト ■チャート UP ( IP -1252) 標準価格55,000円 
カード型データベース _ UP クリッパー （ IP -1253) 標準価格77,000円 
企画齊作成ソフト ■プラン UP 0 P -1254) 標準価格66,000円 


絵や写真を取り込ん C 、 多彩に処理。 

この「ハンデ: f.COPY KIT」 や 「COLOR IMAGE EDITOR」、 「ハンデ{力 
ラースキヤナ」は、絵や写真をコンピュータのイメージデータとして手軽に取り込 
み、編集•活用するためのツールです。取り込んだデータは、統合化ソフトや 
ワープロソフドょど他のアプリケーションとの連携で応用範關もさらに広がります。 


| / n ^ tV-COPY KIT SS - SC 28 M 標準価格49,800円 



COLOR IMAGE EDITOR SS - SC 28 C 標準価格29.800円 

モノクロ ハンデ; (スキヤナと、カラー処理もできるカラ 
ーイメージェ テ、: f 夕を組み合わせたキットです^デス 
クトップノ、。プリッシングへの活用など、イメー ジ処理 
により表現力がさらにアップします> 

♦與出 シリアルインターフェイスホ*ー ド、 AC アダフ。夕 「 fi ] 拙 c 

モノクロハガイスキャナ(同梱） 

ハンデイカラースキャナ ( WD -05 HS •別売）を MZ 
-2861 の環境のもとで活用するためのスキャナ用 
カラー画像取り込み処理ツールです0 

• ( V - 出シリアルインターフェイスボード、 AC アダプタ同捆。 

■ハンデ <カラースキャナ WD -05 HS 標準価格49,800円 


• 使用プリンタ：モノクロ/ MZ -1 P 17、 MZ -1 P 18、 MZ -1 P 19、 MZ -1 P 27、 MZ -1 P 28、 MZ -1 P 29 カラー/ IO - 725 • データを利用できるアプリケーション：デスク UP 
( IP -1251)、 チャート UP ( IP -1252)、 UP クリッパー （ IP -1253)、 プラン UP ( HM 254)、 パソコンファクス28 ( IP -1256)、 一太郎 Ver 2.1 ※、花子* 

※㈱ ジャストシステム製、またこのソフトを利用するには MZ -2861 本体付厲のエミュレーシヨンソフト ( V 2.0) が必要です。 



イメージ処理 

ツーノレ 




16ビットパーソナルコンピュータ 

gggpg •写真の14型カラ-ディスプ l イ MZ -1 D 26 標準価格89,800円マウス MZ -1 X 29 標準 


L アプリケーションと有機的にリンクする日本語環境 

•連文節変換サポート、 JIS 第 1/ 第 2 水準漢字 ROM はもちろん、約 10 万 
語(内 9 万語は ROM) の辞書を内蔵した高機能日本語ワードプロセッサ 
「書院 28 J の搭載。また MS-DOS 上のアプリケーションで「書院28」と同等の 
日本語入力が行なえるフロントエンドプロセッサで、ビジネスワープロと MS 
-DOS が融合したフレンドリーな実務環境を実現しました。 

•レーザープリンタ MZ -1 P 23 950,000円/ •漢字水平インサータプリンタ MZ -1 P 27 
268,000円/#80桁漢字プリンタ MZ -1 P 28 148,000円/籲136桁漢字プリンタ MZ -1 P 29 
168,000円/#80桁カラー漢字サーマルプリンタ MZ -1 P 17 ⑻79,800円/♦マウス MZ - 
1 X 29 13,800円》 MS-DOS は米国マイクロソフト社の商標です。※価格は標準価格です。 


:#和-7。株式会《 

資料のご請求、お問い合わせは…シャープ ㈱ コンシューマーセンターまで。 

西日本 OA 相談室 〒545大阪市阿倍野区長池町22番22号 0(06)621-1221( 大代表）東日本 OA 相談室〒162東京都新宿区市谷八幡町8番地 tt (03)260- U 砧（大代表) 









































につ t 、てお知らせします 0 

イメージ処理された原稿も 

タイレクトに鮮明ファクシミリ。 

イメージ情報ステーション MZ -1 V 01 を使って、「書院‘28」で作っ 
た文書や、イメージ処理された原稿をダイレクトにファクスしたり、 

受信したファクシミリ原稿を編集 U 報告書にまとめたりできるコミュニケーションツールで 
す。鮮明、高品位なファクシミリとして注目を集めるパソコンファクスをさらに推し進めたこれ 
からのメデ f ア。 UP シリーズ同様に「マルチウインドウ」上で切り換えながら使用でき、一連 
の UP シリーズソフトウェアとしても活用いただけます。 

•パソコンで合成•編集したデータを直接送信•時刻指定同報ファクシミリが可能(最大 512 ヶ所)•パソコンに直接自動受信可能 • 
原稿の画像をイメージファイルとじ r 取り込み、合成•編集•送信原稿を保存、手軽に呼び出せ、くり返し使用可能•プリンタエミュレー 
ション機能内蔵、 市販ソフトを MZ -1 V 01 で印刷、 ファクシミリ送信が可能。 ■パソコンファクス28 IP -1256 標準価格99,800円 


ノ {ゾコン 

フアクス28 



■イメージ情報ステーション 

MZ -1 V 01 標準価格278,000円 


■システム構成 


パーソナルコンピュータ 

イメージ情報ステーション 

アプリケーションソフト 

パラレノ l /^ンターフェイス 

マウス 

RAM ディスク 

ハードディスク 

MS-DOS 

電話機 

MZ-2861 
(328,000 円） 

MZ-1V01 
(278,000 円） 

IP-1256 
(99,800 円） 

IP-1256 に同梱 

MZ-1X29 
(13,800 円） 

任意オプション 
MZ-1R35 
(55,000 円) 

任意オプション 

MZ-2861 に 
標準装備 

ファクシミリ機宵巨イ吏 
用時に市販品をご 
使用ください。 


価格は棵準価格です。 


異機種間のソフト利用に新 U 、概念を導入しました。 

全く違うハードウェア間でソフトウェアの互換を持たせる、独創的な発想にもとづいたエミュレーションソフトを標準 
装備。ひとつのハードウヱアに従属するアプリケーションソフトが広く異機種間で使用され、より解放的なソフトウェ 
ア環境が期待されます。もちろん、 MZ -2861 のハードウェア及び BIOS は独自のもの。16ビットパソコンとして数々の 
特長を装備した上で、付加機能としてェミュレーションソフトをサポートしました。 


エミ ユレー 
シヨン ソフト 


■ェミュレーシヨンソフト V 2.0 上で動作する PC -98 UV 2 アプリケーション 


ジャンル 

ソフト名 

妫光金社 

ジャンル 

ソフト名 

tt 光会 « 

ンヤン J レ 

ソフト名 

W 光会社 

7 

1 

プ 

□ 

一太郎 VER .2.1 

㈱ ジャストシステム 

表 

計 

算 

/ 

1 

夕 

人 

1 

ス 

Super Calc 3 Release 2 VER .2.07 

コンピュータ•アソシエイツ ㈱ 

グ 

フ 

ラ 

ゴ 

ツ 

ク 

Microsoft CHART VER .2.1 

マイク a ソフト ㈱ 

TWINSTAR 2 VER .2.00 

マイクロプロジヤノ':ン(株） 

Microsoft Multiplan VER .2.01 

マイクロソフト ㈱ 

CANDY 2 VER .2.3.04 

㈱ アスキー 

WORDSTARset VER .3.30 C 

マイクロプロ ジ ャノ、 •ン揪 0 

The CARD 2 VER . 1.00 

㈱ アスキー 

Z，s STAFF Kid VER . 1.02 

㈱ アスキー 

武蔵 98 

㈱ 0 A テック 

LCALC VER .1.1 

ェィセ 細 

花 子 VER .1.10 

㈱ ジャストシステム 

小次郎 98 

㈱ OA テック 

dBASEIII VER .2.1 J 

日本 アシュトン.テイト ㈱ 

アートマスター 400 VER .2.03 

㈱ システムソフト 

VJE-Pen 

㈱ バックス 

MIGHTY-BASE II VER .2.0 

㈱ ソフトウェア•テクノロジー 

ゲ 

L 

上海 

㈱ システムソフト 

* Z 

MIFES -98 VER .3.0 

メガソフト(株） 

Easy File 2 VER .2.0 C 

エ • アイ•ソフト ㈱ 

立体 版遊荤王 

(株システムソフト 

RED ++ VER . 1.27.16 

㈱ ライフボート 

創玄 VER .1.00 B 

エー.アイ•ソフト ㈱ 





•現在、当社のテストにより上記23本の動作が確認されていますが、未テストソフトも多数ありますので、この本数はさらに增加するものと思われます。•一部ソフトウェアには、動作上、若干の制限事項があります, 
春ェミュレーションソフト VI .0 をお使いの方で MZ -286 に•愛用者力ード返送戴いた方に V 2.0 を無憤で W 呈中/ 


_8ビット MZ シリーズ_| 

これから始めたし、人に ••… ちよつとせし、沢な入門機。 

I 11 Z -§ ESE ) 標準価格159，800円 

* 14型カラーディスプレイ MZ -1 D 26 標準価格89.800円は別売。 

さらにグレードを求める入/ご••… 可能性をひろげる高機能。 

nr/rmmm 標準価格199,800円 

«14型カラーディスブレイ MZ - ID 22 標準価格108.000円、モデムホン MZ -1 X 19 は別売,， 
また装詹されているカセットテープは播彩用で、本体の付属品.市販品ではありません,, 

絵や与^をイメージデータと U ： 手軽に取り込み編集•活用できるイメージ処理 ッール 
八ンディ . COPY KIT SS - SCP 5 M 檷關格45.000円二 0 ^ T ニキぶャナ’取他み* 3 ^ 

カラースキヤナ•ユ ーf イリテ "(SS-SCESC 標準 tt 格 Pfl.000 円•ハンデ(カラースキャナ <WD-05HS«HM*m 4 9.800 

1'1)4- MZ-2500 シリーズで iA •川するためのスキヤナ川 
カラー肉 m 取り込み ton ツール • 



全国の OA ショールームに MZ - 2500シリーズのソフトを展示中。また MZ -2861、 X 68000 のパソコン教室も開催します0 

礼幌 ( 0 ⑴ 642-8 m / 仙台 (022)288-8705/ 東京 ㈣ 260-1 161/横浜 (045)20 卜6525/名古屋 (052)332-26 H / 大阪 (06) 棚-7655/神戸 (078)291-87^ 































































SHARP 


タテイスプレイ 


ここまで身近になった多色化対応0アナ D ク専用カラーテイスブレイ。 



2モードオートスキャン方式採用、 
鮮やかな65,536色表示、 

使いやすさを追求した 

八イコストパフオーマンスモデル。 

•入力周波数 15/24 kHz 自動切り換え、 
2モードオートスキャン方式採用 ♦ 14型 
ファイン ピッチ ハイ コントラストブラウン管 

採用•ァナログ RGB 専用入力。65,536 
色などの多色表示が可能參コンテンポラ 
リーな美しいフ オルム春 コンピュータ接続 
ケーブル付属拳チルトスタンド（別売）装 
着可能 


14 


型カラーテ-イスフレイ 


CU-14BD 


標準価格64,800円 


lzktjz\ 


チルトスタンド TF -14 AD 標準価格4,800円は別売。 



、八2モードオートスキヤン、 TV チューナー内蔵 

14型カラーディスプレイテレビ 

CZ-880D(GY*BK) 標準価格109,800円 


15 


3モードオートスキャン方式採用 

型 カラー ディスプレイ 


CU-15MKE) 


標準価格99,800円 


9 


実務レベルに対応する高解像度 

型モノクロディスプレイ 


MD-9P1 


標準価格34,800円 







デ:^レ'^^ 様 

標準価格 

サイズ 

ブラウン管 

ドットピッチ (nJ) 

表示色数 

表示文字数 

入力信号方式 

備 考 

多 

CU-14BD 

64,800円 

14 

ファインピッチハイコントラスト 

(0.42) 

多色# 2 (アナログ） 

実使用4050/2000* 3 

アナログ RGB 

❹@ 

色 

化 

対 

応 

CU-14AD 

84,800円 

14 

高 解像度ハイコントラスト 

0.31 

多色(アナログ） 

4050/2000* 3 

アナログ RGB 

❹ ® 

CU-14A4 ★ 

89,800円 

14 

高 解像度ハイコントラスト 

0.39 

多色 <2 (アナログ )/8 色(デジタル） 

実使用4050 

アナログ•デジタル RGB 

❽@ 

CU-15MKE) 

99,800円 

15 

高 解像度フラットスクェアハイコントラスト 

0.39 

多色 #2 (アナログ )/8 色(デジタル） 

実使用4050/2000~ 

アナログ•デジタル RGB 

1 ❹ 

モ 

ノ 

12M-15B 

29,800円 

12 

高 解像度ノングレアハイコントラスト 


グリーン 

2000 

コンポジット 

0) 

MD-9P1 

34,800円 

9 

解像度ノングレアノヽイコントラスト 


ペーバーホワイト 

4050 

コンポジット 

❹@ 

ク 

□ 

MD-12P1 

39,800円 

12 

裹 解像度ノングレアハイコントラスト 

— 

グリーン 

4050 

コンポジット 

(D 


MD-12P2 

39,800円 

12 

高解像度ノングレアハイコントラスト 

一 

ペーパーホワイト 

4050 

コンポジット 

(D 


CZ-820D(E)(B) 

79,800円 

14 

ファインピッチハイコントラスト 

(0.45) 

8色 

2000 

RGB/ コンポジット 

❽ 

T 内 
V 

CZ-830D(BK) 

98,000円 

14 

ファインピッチハイコントラスト 

(0.42) 

多色* 2 (アナロの/8色(デジタル） 

実使用4050 /2000 i3 

アナログ•デジタノレ 
RGB / コンポジット 

❹❽ @ 

チ 

CZ-880D(GY)(BK) 

109,800円 

14 

高解像度ハイコントラスト 

0.31 

多色 W (アナログ )/8 色(デジタル） 

4050/2000* 3 

アナログ•デジタノレ 
RGB / コンポジット 

❹❽ @ 

1 

CZ-600D(E) ⑻* 

129,800円 

15 

高解像度フラットスクェアハイコントラスト 

0.39 

多色* 2 (アナログ )/8 色(デジタル） 

実使用4050/2000* 4 

アナ a グ•デジタノレ 
RGB / コンポジット 

❹❽ @ 

ナ 

1蔵 

CZ-601D(GY)(BK) 

119,800円 

15 

高解像度フラットスクェアハイコントラスト 

0.39 

多色* 2 (アナログ） 

実使用4050/2000* 1 * 

アナログ RGB / 
コンポジット 

❹❽ © 


CZ-611D(GY) 

145,000円 

15 

高解像度フラットスクェアハイコントラスト 

0.31 

多色* 2 (アナログ） 

4050/2000* 4 

アナ a ク RGB / 
コンポジット 

❹❽ @ 


•型番中の （） 表示は、 E (JY くオフィスクレー >.B BK< ブラック > を示します . 丨（ ） 内はスリットヒッチ.卜2 512色、4096色、65,536色なとコンヒュータ出力信号に応した多色表示か可能+3 I5kHz/24kHz の自動切換え 
士 4 ibkHz 24kHz 3〗kHj の启勧切換え©チルトスタント装湣可能（別売）©テシタルサイン搭 It © リモコン付©接砖ケーブル同梱 （GU-14A4. MAD、MBD はアナロク用接給ケーフル付属）★在庫僅少 


泌 tr - 系株式会:》 


•お問い合わせは…シャープ味電子機器事業本部システム機器営業部〒545大阪市阿倍野区長池町22番22号 0(06)62 卜1221(大代表） 
電子機器事業本部テレビ事業部第4商品企画部〒162東京都新宿区市谷八幡町8番地 0(03)260- 1161(大代表） 
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七一三とて:^ 

-上ダ- 


対応機襦 ： P _1 SR / TR / FR / MR / FH / MH / VA 、 PC *9801 
SHARP X -1 全檄槓、 MZ -25 (XX FM -7, FM -77 AV . 

' MSX 2* X 68000 (期で表示の檯穩は発売中です。） 
ディァ ：5‘2 D 5 tt 、5’2 D 04 枚、 52 HD 4 枚' 352 D 5 tt 、3.52 D 03-4 枚 
* グラフィ_ック：イメージスキャナーによる画像取り込み 
メッセージデータ： 20万字程度（原搞用紙500 ~フ00枚） 

価 格： 9,800円 




I1I0VELMIARE ^ 

■十 . "7 •一な/ 一.！ r •… 



THE LEGENDS。Of DIMENSION ALPHA 


ボルテージアップの為、あえて沈黙⑽けたシャティ。始動// 

待ちわびたシャティの始動だ。今ここでシ f テイ情報の全ては言えないが、ヒ 
ントを与えるとすれば、ログイン1月号の「愛とは…憎しみとは…この永遠の 
凝問符に楔を打ちこむのはシャティかもしれなしヽ OJ というコピー•フレーズだ 
ろろ。また、シャティの魅力につし VC は;^号から続々とニュースされるので、お 
いしい物でも食べてベストコンデイシヨンで待っていてくれ。 e 


SACOM AMUSEMENT CLUB ( SAC ) SAC は、システムサコムを応拔 
したいというノンなら、どなたでも人会できます。人会企•会货はまったく.必•及:あ 
りません。人会希嗜のガは、 ffc 所 (〒） •氏名•屯姑番号•忭別•パゾコンがあ 
れば榉補名を明記のヒハガキまたは封, 1 re 、 システムサコム内 「sack 
伤丨までお中し込みドさい。なお、 Yg , 话による屮し込みは受けつけておりま 


せんので、ごドさい。 

/ヴェルウェアテレホンサービス . TKL . 03 - 635-5147 

ユーザー サボー 1 . TE し 03 - 635-7609 

艰站によるお間い介わせは、 U 〜金 AM 10 : 00 〜 PM 5 : 00 の 
間、お受けしております。 1 :此以外のお池站はご迫他 I 、•さい。 


SQcom 


株式会社システムサコム 
亍]30東京都墨田区両国 4-38-16 ^ 

両国桜井ビル 4 F 






































パーソナルコンピュータとともに 

EAST 

FOR 

SHARP XY6 日000 



■個性が光るクイック .ワープロ 
です0 

SHARP X68000 対応 ¥38,0 的 (E1 付 ) 


機能の数を重視する現在の日本語ワープロの中にあっては 、 E 
W は非常に個性的です。当たり前のことですが、ワープロ本来 
の機能と操作性を重視し、シンプルで使いやすいワープロを目 
指しました。ですから、スクロールなども早いですし、印刷も、 
わざわざメニューに戻らなくても瞬時に印刷モードに入れる使 
いやすさです。また、索引や目次の自動作成など、まさに文書 
作りに徹した個性が光ります。 


■マルチ ウインドウ画面 


■目次と 索引の自動作成 




kgl トザ抑??货切屯择相 f 平!^ 


加把:’び的.::: 

JM 1 童 I 


. 離 wai 灘辦圈& 





■ ew の k な特長 ►差込印刷、特定用紙印刷といった、フォームオーバーレイに対応する強力な印刷機能►大摄のドキュメント作成に非常に便利な目次、索引の自動作成►プロ 
グラム開発等に威力を発揮するェデ f タモードの標準サポート ► 独自のカナ漢字変換プロセブナ E 1 の標準搭躲 ► 他文迸参照やカット&ペーストが行なえるマルチウインド処理►編 
集画面からの OS コマンド及びユーザープログラム実行►表を含む文章での強力なブロック操作►操作は MULTIPLAN に準拠したコマンドメニュー方式 ►WORD MASTER 
に準拠したコントロールコマンドも容易►ファイルの大きさに制限のない仮想メモリー方式採用►バッグ T ップファイルを自動作成する安全設計 ^ OS 上で稼働し標準テキストファイル 
を生成します > 

■ X 68000 ならではの特長 ► イーストが独自に開発した商速 日本語 カナ澳字変換フロントプロセッサ E 1 の搭极 l ： i ： り、今までには体験で 
きなかった 日本語 人力が可能で1； E 1 は市販の代表的フロントプロセッサ VJE 、 ATOK の良さを考慮し、設計したまさに X 68000 の標準と 
なりうる高速カナ漢字変換フロントプロセッサで1； ► ェデ f タモードの標準サポートはり、行番号を总潞した大規模アプリケーション開発 
等を行なえます^ X 68000 の 持つ 優れたハードウェア機能を引き出すプログラム開発の強力な支拔 ツールと なりま1~。 


ユーザ_ 

待望ガ 


ットで$るク U エイテイブソフトです> 


パソコンが持つグラフィック機能、ミ 
ュージック機能、サウンド機能など。 
これらの独立したマルチ機能を統合 
した八イパー UD 。 プログラミング 
することなぐ絵や音が自由にエディ 
パソコン紙芝居、アニメーション、パ 
ーソナルゲーム、デスクトッププレゼンテーション、各種教材、さらにビデオ 
編集に有効に利用できます。 

A ベンやブラシを使って描画を 

Q RAPHICS I 山価いっぱいにペンやブラシ.スプレーなどを使って松や文•ドが n 山に描 

editor けます 11 リや叫内、 11*1: 拟を ノ 「いたり.嗜りっぶしも恐いのまま。65537 Ci '|» 
240色を M 時及示可能です。 

CTD *- r：uA MPi マウスを使ってタイトル文字を 

卜 H ヒヒ MANU マウスで.いたフリーハンドの文卞などをに表示 u ： いきま1；文 r サイ 
Editor ズ、色は、 fll に变えるこできます> 

メロディ、コード、リズム、パターンの設定 

㈣ ifii に及 'j •くされた鍵盤をマウスで ; K 択するだ It の T •样さ。オリジナル1111も简 
小に,! Kifii に,丨?き及すことがで&ます> コード、リズム、パターンはもちろん.來 
器の神. Wi の议定もで5ます ■ 

ホームビデオの編集も OK 

スクリプトでビデオとの M 則を•没定しておけば、テ〇ップ.フリーハンド.スプ 
ラ仆、 fT 浆などをホームビデオと統合じ CWi 川できます ■ テレビ ㈣ 而との統合 
もできます。カラーイメージュユット（別必）を使えば、オリジナルテープ fee 


MUSIC 

Editor 


VIDEO 


SCRIPT 


SPRITE 

Editor 


TELOP 

Editor 


VOICE 

Editor 



多緒中 

Ql « I 串，. 


シナリオ(構成)作成も容易 

各エディタで作られた映像や ff の構成を 
改定できます> _面ごとの効果、？(間文/河 
荇文、分岐条件などを決めることができます ） 
阀而ごとのテストラン、ビデオとの M 期役定 
やこの_面よりの各エテ V 夕の灾行もできます； 

スプライトでアニメ作成を 
32 X 48 ドット. 64 X 96 ドットのスプラ仆が作 
成できま - f 。 人物や！》力物などのキャラクター 
を <• 、くつも作成しておいて、これを！^ tT 衣示 
すればアニメーションやパーソナルゲーム 
が作れます。スプラ仆の衣示顺け:、速度、 
移勛 fit 移觔ルートが決められます> 

テロップ作成も容易 

あらかじめ•泣定してお！ • 、たテロップをシナリオ 
の T Wi に従って流すことができます> 文字サ 
イズ、エッジング、バックカラーの衍定は肖 
山。テロップの方向、場所、スピードも道べ 
ます> 

ナレーションの録音•再生が可能 

ft •声デジタイズ此鉍 ADPCM < U ：0 肉声 
や効*作、楽までもファイルできます> これ 
までに出せなかった®疔に近い n 然作が及 
祝できます> 


«E1 


■マルチな遊•感覚で評判の八イパー UD が El 搭載、 
スピード UP / ニューバージョンで渐登場•グ 


•現在、八ィパー UD をお使い赌様へ 


バージ3ンアツフ • サービスをいたしますので、 
ユー サ ー登 錄カードをお送り<ださい。 


SHARP X68000 対応予価 ¥21 ，的 0(E1 付 ) 


イースト株式会社 本社/〒151東京都渋谷区代々木卜 3-1 0(03)374-1980( 代表） 














































イース II は、イースの続きです > \ _ 

イースガな<てもイース II はプレイできますが、イースをブレイしてお<とイース II がより楽しめます。 / 

注） X -1 turbo Model -10 ではディスクで DMA を使用している為、 CZ -8 巳 GR 2 • CZ -8 巳 F 1 が必要です。 


• X-l turbo シリーズ専用 .5-2 D .5 枚組.¥9,日〇0 

注） X -1 turbo ModeMO では CZ -8 BGR 2. CZ -8 BF 1 が必要で; 


P 

I Falc 

I Personal 


：Om 圓献戴塗御 : 

Computer Software 

〒190東京都立川市柴崎町 2-1-4 トミオービル 


通信販売(送料無料） 

•現金•留の壩合 - 

氏名•機種名•住所•氏名•電話番号を明記して、現金書留でお申し込みください。 

•代金引換の場合 - 

電話や FAX や八ガキで、品名•機種名•住所•氏名•年齢•電話番号を明記して、 
お申し込みください。商品お届け時に商品代金をお支払いください。 

TEL 0425 (27) 6501 FAX 0425(28)2714 




















スべシヤ, 


ル会員 


U 4 ^ mmrn 

ギユフ 




is c^ p 


■うれしい特典たち ■ 

參ホビー、ビジネスソフトの削引。 

•シャープ製品(ソフト S 八ード)の削引。 
•各種イベント、セミナーなどの優待及び割引。 
•会員証(テレホンカード)の発行。 

そして、情報誌 「X68000 つ〜しん j の配布。 
その他数々の特典がわんさか、わんさか0 


CZ-B11C 20MB 八-ドディスク内蔵… 定価¥399,800岭月々¥12,000 X36 回払など 
CZ-601C 標準タイブ . 定価¥297,000峰月々¥ 9,700 X36 回払など 


CZ-B01D 15 型カラーティスプレイテレビ (0.39mm ピッチ) . 定価¥119,800 

CZ-B11D 15 型カラーディスプレイテレビ (0.31 mm ピッチ) . 定価¥145,000 

CZ-BST1 チルト台 . 定価¥ 5,800 

CZ-BVT1 カラーイメージ ユニッ ト . 定価¥ 69,800 

CZ-8NS1 A 4 サイズフルカラーイメージスキャナ . 定価¥188,000 

CZ-6BN1 スキャナ用パラレルボード . 定価¥ 29,800 

CZ-6BE1 増設 1 MB RAM ボード ( CZ -600 C 専用) . 定価¥ 35,000 

CZ- 阳 E1A 増設1 MB RAM ボード (ACE シリーズ専用） . 定価¥ 38,000 

CZ-6BE2 増設 2 M 巳 RAM ボード . 定価¥ 79,800 


ツクモ X 68000 クラブ」会員募 


ジョイ 


詳しいお問い合わせ、 广 03-253 -4199 ( 11 ^) 

■卜入会の手轿きは、原則的に7号店店姐にて受付と 
なりますのでご承了ください。 


CZ-6BE4 増設 4 M 巳 RAM ボード . 定価¥138,000 

CZ-6BP1 数値演算プロセッサ . 定価¥ 79,800 


HI ■■■特価販売中/お問い合せ下さい。 


XS 6 日000用ソつトウエ7 


•C Compiler PROB 8 K シャーブオリジナル C コ 
ンパイラ . 定価¥39,800 

• Kamikaze (神風)統合型スプレッドシート 

. 特価 ¥57,800 

• Z’s STAFF PROB 8 K グラフィックツール 
. 特価 ¥49,500 

• EW 日本語ワープロ . 特価 ¥32,500 


XY 68000 用ハードディスク 


•アイテック 

IT - H 540 HSX 40 MB タイプ 28 ms . 特価 ¥ f 38,000 

IT - H 540 SX 40 MB タイプ 38 ms . 特価 

IT - H 320 SX 20 MB タイプ 28 ms . 特価¥ 923000 

•ウインテク 

HD -202 20 M 巳タイプ 85 ms . 特価¥ 72,000 


•MUSIC P 闩 OB 8 K ミュージックツール 

. 定価 ¥18,800 




z 用八ードディスク 


•SOUND PR 068 K サウンドツール….定価¥15,800 

•SAMPING PR 0 B 8 K AD PCM 活用ソフト . 定価¥17,800 

•DATA PROB 8 K リレーシヨナルデータベース 

. 定価 ¥58,000 

この他にもビジネスソフト、ホビーソフト、 

多数販売しています。お気軽にお尋ね下さい。 


ご利用下さい、通信販売 

ツクモ通販センター 

東京 (夜10時迄受付) 


代金引換え配達 

s でツクモ通販センターへお申し込み 
下さい。配達日の指定ができます。 

クレジットご希望の方は 

Q でツクモ通販センターへお申し込み 
下さい。 


現金書留なら 

〒101-91東京都千代田区神田郵便局 
私書箱135号 

九十九電機 ㈱ 通信販売部 

銀行振込みなら 

事前に〇でお届け先をご連絡下さい。 
富士銀行神田支店® No . 894047 


20 MB (10 MB + 10 MB ) タイプ 
ケーブ;レ + HD I / F 付 


セツト特価 



ボケ：)し:)ーナーめあ3ツ々モ 

_7号店 s 03- E 53-4199 
♦名古屋1号店 S 052-263-1655 


•ツクモ札幌 S 011-241-2299 



PC - E 500 定価 ¥28,800 

32 KB 標準装備(最大 96 KB )、240 X 32 ドットフル 
グラフィック表示、エンジニアソフトと U ： 定数124、 
公式•データ744、演算機能233の機能搭載 

特価 ¥245000 















































夏の 

フ / i ^ セール ^ 


特典 

ー ック 

' W ^ ら發 


名古屋 アメ横合同企画 
グ⑽ アメ横サ 7- “ 

休で営業してぃまも 7 /i4 〜日つは無 


ll \#3^5 LEZ \ 

セット 

• CZ-822CB.¥118.000 

• CZ-820DB. ¥109,800 

•ディスケット (10 枚)+ゲームパック 

. サービス 

合計定価 ¥197,800 

ツクモ特価販売中 



グッドセレ= 

: S ノエふ加盟店 r の特別割引。 

I ート事務局 


みん《〇ってる持っている お申し込みはツクモ ^尸力〇〇众 （入会姐、料）1 

狄葉琢電氛 ま^^ 州- 2 jit 思? 上は ます。 1 

信頼と安心から生まれた 


1等10万円/ 

賞金級額7,000万円< 

★ 5000円以上お買い上の方に抽選券 
進呈（東京店頭のみ）。 

★秋葉原各店では、 7 月中で f 
PIV 16 時〜7時半のサマ—タイムし5000円 
以上お買上げの方に、サンセツトプレゼン 
卜もご用意しています。 




ツクモオリジナル 

5 インチ 2 □ドライブ 

TS-FDmkiiX1 


• TS-FDMKI1 にケーブル及び特製 I F を セットしたもので、 
これ だけでディスクシステムが使用できま t； 

• i ドライブは CZ-503F、 2ドライブは CZ-502F 相当品です 

1 ドライブ 特価 ¥325300 
2 ドライブ 特価 ¥49,S(M} 


ドライブ T §^ FDDmkiixi ( 夕-ボモデル彳。を途く） 

XI ターボ 用 2 HD /2 □□自動切替 
1ドライブ 特 m ¥38,800 2 ドライブ 特価 ¥59, S00 


モデム 


: . !；：：■;； ；：, .... 


セット 

• CZ-880CB.¥218.000 

• CZ-880DB.¥109.800 

參デイスケット （10 枚〉+ゲームパック 

. サービス 

合計定価 ¥327,800 

ツクモ特価学 ts9f«oa 


オムロン MD-1200AII 300/1200 ボー . 特価 ¥ 19,800 

MD-2400B 3001200/2400ボ- . 特価 ¥39,800 

アイワ PV-A1 200 mkll 3001200 ボー . 特価販売中 

PV-A 2400 300/1200/2400 ボー . 特価販売中 


ブリン ター 


プリンター用紙サービス./ 


XI ターボ/ MZ -2500 用マウス 

TS-MX1 特価 ¥5,500 

■便利なマウスパッドあります。 ¥1.280 より 


PC-E200 

Z-80CPU、RAM 容 1;32KB 

情報処理技術者対応 CASL、BASIC 関数計算機能、86 
関数、パソコンとの接続、テキストエディタ+シリアル I/F 等, 
機械語学習、ミニレ〇機能、 Z-80 バス搭載。 

特価 ¥f 75800 




CZ-8PC2 カラー漢字熱転写プリンタ . 特価販売中 

CZ-8PK6 24ピン漢字ドットプリンタ (15 インチ) . 特価¥09,000 

CZ-8PK7 24ピン漢字ドットプリンタ(彳〇インチ) . 特価販壳中 

CZ-8PK8 24ピン漢字ドットプリンタ （15 インチ） . 特価販亮中 

CZ-8PK9 24ピン漢字ドットプリンタ （10 インチ） . 特価販売中 

10-730 カラーイメージジェットプリンタ (15 インチ)…… 好評発売中 
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レイトレ■シンクソフト cl 


近日発売 


新発売 


¥98,000 
¥198,000 


C-TRACE 98 (PC-9801 対応 ) 

C-TRACE 98+ (PC-9801 対応） 

C-TRACE NEWS ( sony ) ¥380,00 

C-TRACE 68 (X68000 対応） ¥68,000 



C - TRACE 68 は、 マウスて簡単入力/ 
ワイヤーフレームで確認しながら形状作り。 

カメラアングルもすばやく決定/ 

Z S STAFF PRO -68 K (ツァイト社)との 
データの やりとり 可能。 


IACE は CF 制作に活躍してし ぼす。 



P 動作環境 

( PC -9801 シリーズ全機種1 
RAM 640 KB 
；■： MS-DOS Ver .2.11 以上 
コプロセッサー（8087,8028 7) 有無どちらも対応 
，現在サボートしているフレームバッファ （ X 68000 は本体のみ） 
1 PC -9801 本体内 VRAM 

写像 SIG 社/スーパーフレームサピエンス社 
L ハイパー フ レー ムデジタル アーツ 社 
p コプロセッサー，フレームバッファの販売もいたします。 

I 10 MHz 8087-1 ¥35,000 


株式会社キヤスト 


:- TRACE 9 B ユーザーには、98十を差額 (¥ 100,00 0) にて交換いたします。 

〒丨50東京都渋谷区 3-6- 18第4矢木ビル 4 F TEL .03-797—51 28 FAX .03-797-6974 








5 H 11 日から 5 月 14 日まで東京流通センターでマイクロコンピュ 
ータショウが，また5月18日から5月2旧まで東京•晴海の見本市 
会場で第66回ビジネスショウが開催された。今年は日程がずらさ 
れて開催*れたこの2つのショウは，マイコンとビジネスという 
性格がますます明確となり，互いにそのコンセブトがはっきりと 
打ち出されたものになった。 


，年は一般来場者の数も少な 
く1なり，その専門的色合いが 


さらに強まったマイコンシヨ 
ウ。ただし， x シリーズの参 
加がなくなったのはちょっと 
残念 




主流は国産32ビットへ 


5月11日から4日間，東京流通センター 

において マイクロコンピュータシヨ ウ’88 が 

開催された。例年ビジネスショウ！:同時開 
催されるのだが，今年はビジネスショウよ 
り1週間先行して開催された。今回のテー 
マは「マイコン： かぎりなき創造の 世界」 
というこ！：になってはいるが，例年のこと 
ながら各 ブースの 展示内容は テーマと はあ 
まり関係がないようだ。 

最近の傾向としてマイコン ショ ウではコ 
ンピュータ，エレクトロニクス 関係の基礎 
技術が中心に なっており， 具体的な製品群 


はビジネスショウでというぐあいに分化が 
進んでいる。出展内容も特定用途向け LSI 
ほか各種コントローラ，液晶パネルなどの 
デバイス関係が多く，以前のようなソフト 
ハウスからの出展もついに姿を消してしま 
ったのは少し寂しい。 

昨年はどこもかしこも ASIC 一色だった 
が今年はそれもひと段落といったところ。 
今回特徴的だったのが国産32ビットマイク 
ロプロセ ッサに 対する 各社の力の入れよう 
であった。富士通 （ F 32), 日立 （ H 32) など 
の 「 TRON チップとしても使える」という 
もののほか ， VM テクノロジー （ VM 8600 
S )， NEC ( V 70)， そのほか最近流行の RIS 
C チップ， Sun -4 で採用されて話題となっ 
た SPARC プロセス による プロセ ッサなど 
が展示されていた。面白いのが VM 8600 S 


AX が話題を集めた今年のビジネスショウ。シャー 
プのブースでは OS -9/ X 68000を始め，数多くの情 
報ツールが展示されていた 


という チッフ 。で，これは従来マイクロ コー 
ドで行われていた命令制御をプログラム可 
能な素子群に置き換えて8086のコードなど 
を実行できるようにしたもの。いわゆるフ 
アーム ウェアを実現したチップである。メ 
一力一では「新世代32ビット バーチャル マ 
イクロプロセッサ」と呼んでいる。 

シャープのブースでは X シリーズ関係の 
出展はなく， MZ -2861 によるイメージ処理 
やパソコン通信関係の展示および，可変長 
PCM 録音用 LSI や光磁気ディスタ，液晶/プ 
ラズマディスプレイなどの展示物が中心だ。 
なかでも液晶のトップメーカーとしての実 
力を示す，ハイコントラストなダブルツイ 
スト液晶による表示デバイスなど，新技術 
によるデイスフ"^イパネルが参考出品され 
ており注目を集めていた。今後のポータブ 
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マイクロコンピュータショウ’昍 


s 第66回ビジネスショウ 


マイコンショウ’88 
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マイクロコンピュータショウ/ビジネスショウ 15 





















ル機器の表示デバ’イスを占ううえでも興味 
J 罙い技術 AT といえるだ、ろう。 （ S . N .) 


第66回ビジネスショウ 


AX マシン登場 

東京 • 晴海の見本市会場で開催された第66 
回 ビジ ネスショウは，パーソナルコンピユ 
ータユーザーを ワクワク させてくれるよう 
な新製品が登場しなかったこともあって， 
今年の会場全体のイメージとしては，比較 
的こぢんまりとま！：まった印象のものであ 
った。特にここ数年の AI や通信，はたまた 
電子黒板といった，会場内のあちこちで見 
かけられるような流行の中核となるものも 
なく，その分自社の目玉商品を前面に押し 


出し個性的な演出を心がけたブースが多い。 

そのような雰囲気の会場のなかで，今年 
の テーマが 「インテリジェントオフイス. 
仕事とやすらぎの展開 j だったせいもあっ 
てか，事務機メーカーの fr ブースは演出に 
も凝っていて，赤と黑の人胆なカラーを使 
った屋根付きブースを用意.したり，派手な 
デモンストレーションをしたりと，今回の 
ショウのなかではいちばん活気があった。 
また，コンピュータ I 詞連のブースのなかで 
は， MC 68030 搭載の新製品 • NWS -1830/ 
1850 を発表したソニーが，ブース全体を N 
EWS シリーズのハード7アプリケーション 
で統一した，地味ながらもポイントを絞っ 
たデモンストレーションを展開しており， 
多くの来場者の関心を集めていた。 

今年のビジネスショウ全体のなかで話題 


を集めたものといえば，やはりシャープ， 
三菱 電機， 三洋 電機の 3 社が投入してきた 
日本語 PC / AT 互換の AX マシンということ 
になるのだろうか。 三洋 電機の MBC -17 J 
シリーズは事前に発表.されており，マイコ 
ンショウにも登場していたので，さほどの 
インパクトはなかったものの，ビジネスシ 
ョウには三洋がラップトップも含めた11機 
種を同時に発表し，特設コーナーでの国際 
色豊かなデモンストレーションには驚かさ 
れた。そのほかシャープ， 三菱 電機もブー 
スの前面に AX コーナーを設置していたが, 
それらのデモがいずれも MS - Windows や 
Guide , IBM-PC HI ゲームのほかに，一太 
郎などの日本の既存ソフトの移植版を用意 
したところも多く，米場者もこのハードに 
m して注目はしているものの，期 侍 度の 点 


16 Oh ! X 1988.7. 


























ビジネスショウ 


電子 タイヤ ラー 


❿豊富に揃えられたパーソナル情報ツール。 
上からノートワープロ WV -500, カラーワー 
プロ WD -9 I 0, 参考出品の電子ダイアラー， 
ボケコン PC - E 200/ E 500 
❿新しく登場したシャープのプリンタ3タイ 
プ。レーザプリンタ MZ -1 P 23 , カラーイン 
クジェットプリンタ10730，136桁漢字ブ 
リンタ MZ -1 P 30 

❿これがマルチタスクで話題の 0 S -9/ X 68000 
❿真剣な表情で原稿を読み上げてはワープロ 
に文字を入力/変換させていた，音声ワープ 

口のデモンストレーシヨン 
❿ズラッと並んだソニーの NEWS シリーズ 
❿参考出品されていた PC -9801 版 Kamikaze 


からするといまひとつといった印象だ。 

トータル情報システムをテーマに 

さて，期待しながら訪れたシャープのブ 
ースでは，電子手帳からワークステーシヨ 
ンまでと幅広くハードや各種 ツール 類が展 
示され，「知的活動を高度に支援するトータ 
ル 情報システム.キャンパス OA 」 のテーマ 
どおり，個人ベースから企業規模までに対 
応できるビジネス ツールがところ 狭しと展 
示され，卜ータル情報システムを前面に打 
ち出したシャープブースに対する一般来場 
者の関心も高かったように思う。 

そのなかでも最大の関心はやはり初登場 
の OS -9/ X 6800 0。 この OS -9 の マルチタス 
ク•マルチウインドウのデモには X 68000 
ユーザーのみならず，他機種ユーザーや各 


企業の開発担当者から熱い視線が送られて 
いすこ。 OS -9/ X 68000の詳しいことについて 
は今月の 「 X 68000 あなたの知らない世界」 
(116 ページ）に紹介してあるので，そちら 
を参考にしていただきたい。 

また，今回シャープが発表した AX マシ 
ン • AX 386- F /386- FH 4 の2機種は，ブー 
スの前面に大きく スペースをとって展示さ 
れていたが，シャープの AX マシンは32ビ 
ットのみで価格も80万円以上と， X 68000 と 
同じくこの AX マシン もパーソナルワーク 
ステーションと呼ばれているようだが，こ 
の2つではかなりニュアンスが異なってい 
るのを実感した。 

そのほかには光フアイルシステム DQ -50 
00や2ワークステーション，カラーワープ 
口 WD -910， ノー トワープロ WV -500， 光 


磁気デイスクドライブ JY -500， 電子手帳 P 
A - 7000/6500，ボケコン PC - E 200/ E 500 な 
どなど，参考出品のパーソナル音声ワープ 
口まで含めると，その内容の豊富さには目 
を見張るものがある。個人的には薄型ノー 
トワープロ WV -500 の軽量小型化に興味を 
引かれたが，いずれシャープのラツプトツ 
プ型パソコンが登場するのであれば，ぜひ 
このサイズに挑戦してほしいものだ。 

今回のショウのように，シャープがトー 
タル情報システムを提案するのは企業カラ 
一から考えても大いに賛同したいところだ 
力 ? ，今後はこれら既存のハードとこれから 
登場するであろうさまざまなハード/ソフ 
卜とが，フルコンパチブルなトータル情報 
システムを完成してくれるその可能性に期 
侍しておきたい。 （ T . S .) 


マイクロコンビュータショウ/ビジネスショウ ±/ 
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慵万長者 
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どうです，いきなり登場した上の写真を見 
て驚いた方も多いことでしよう。ここしばら 
く，やれ「ドラス ピだ j ヒ か 「 R - TYPE はま//か」 
とか，シューテイングゲームの話題ばかりが 


イルが届きました。差出人はというとあの J . 
B . ハロルド。いま桜の季節も終わったワシン 
トンでバーボン片手に難事件に取り組んでい 
るらしい。さて，この結末を X 68000 上で報告 
してくれるのはいつになるのかな。それから 
それから，膨大なスケールで,活題を堪めてい 
るシミュレーシヨンゲーム太平洋の嵐も夏か 
秋ごろ登場するんだって。これまで「シミュ 


先行していた X 68000 のゲームソフトに，いき 
なりフルスロットルと熱血高校ドッジボール 

部ですからねえ。でも，シューティングゲー 
マーとしての血が騒ぐ，なんぞといいつつ ， n 
をなが一くしている皆さんにも，この2本の 
ソフト登場は一服の清涼剤として十分楽しん 
でいただけるのではないかな。この2本はい 
ずれも7月中にシャープさんから発売される 
ので，期侍していてね。 

そうそう，5月に突然 Oh ! X 編集室(こエアメ 


レーシヨンゲームが， X 68000 には出ないじや 
ないの」といっていた方，人•丈夫です。きっ 
とこれ1本で，来年のお正月までずっと遊ん 
でいられるはずですから。 

さて，米月の SPECIAL REVIEW はソーサ 
リアン続編とイース n の杂華 2 本立ての r •定 
です。7月には HuCARD にファンタジーゾー 
ンも発売されるようだから，こうなればまた 
近いうちに，ゲーム特诋でワッと盛り上がっ 
てみたい気分になってきましたね。 



読者が選ぶ今月のゲームベスト10 

おのれ，世の平和を乱すにっくき頼朝め，地 
獄から復活したこの景清が，みごと成敗してく 
れるわ！というわけでダントツトップの源平 
討魔伝です。 X 68000 版が発売されて以来，うな 
ぎのぼりの大人気。満点のサウンド効果，画面 
狭しと出没する妖怪変化，だじゃれの国に血の 
池地獄，ひえぇ，ハマッちゃったよ一，という 
人が続出してるらしい。一方，前回トップの M 
& M やイースなどのファンタジーも変わらず強 
力です。ソーサリアンも出てきたし，「剣と魔法」 


の世界はこれからますます目が離せなくなって 
きましたね。 

1 . 源平討魔伝 

2 .スーパーレイドック 

3 . Might and Magic 

4 . イース . 

5 . 上海 

6 . SUPER 大戦略 

7 . 三国志 

8. ぎゅわんぶらあ自己中心派2 
9 . スペース ハリ アー 
10. ウイ ザー ドリィ 


18 Oh ! X 1988.7. 
























_ ソフト情報 


☆ •••6月4日現在発売中 ★•••近日発売予定 

★ハィドライド3 

やった一，今度はハイドライド3がついに登場 
するぞ。舞台はもうすっかりお馴染みになった人 
間と妖精たちが平和に暮らす国，フェァリーラン 
ド。その国では過去何度かの苦難の時代があった 
が，いまは宮殿に祭られた3つの不思議な宝石の 
力によって，平和が保たれていた。しかし，ある 
日，これら3つの宝石が何者かの手によって持ち 
去られてしまったのだ。すると過去，人々をいま 
わしい目に遭わせたあの悪魔バラリスが復活し， 
再び王国全土を恐怖のどん底に陥れようと動き始 
めた。そうして美しいアン王女にまでバラリスの 
魔手は迫った。いざ，王国とアン王女を救うため 
勇者は立ち上がるのだ。ここから新たなハイドラ 
イド伝説が始まろうとしている……。 

Xl / X 1 turbo 用 5”2 D 版2枚組7,800円 

(2 ドライブ専用） 
ティーアンドイーソフト 0052(773)7770 

★ィース II 

ソーサリアンが出た.っ！と，大騒ぎしている 
間もなく，今度はこのイース II が6月24日に発売 
される。ストーリーはイース I で集めた6冊の古 
文書の謎を解き明かすため，再びアドルは氷や溶 
岩世界そしてサルモンの神殿へと向かうことにな 
る。マップは前作の4〜5倍，数多くの謎を含み 
前回以上に力のこもった24曲のゲームミュージッ 
クとともに，感動のラストシーンへと，プレイヤー 
に息をもつかさぬシーンが次々と展開する。ソー 
サリアンのパッケージに書かれていた「 XI 版はデ 
キがいいよ」の文字が，またこの「イース II 」でも 
実現されること大いに期待しておきたい。 

Xlturbo 用 5"2 D 版4枚組7,800円 

( ModellO は要 CZ -8 BGR 2, CZ -8 BF 1) 
日本ファルコム 00425(27)6501 

★めぞん一刻•完結編〜さよなら，そして…… 
明るい一刻館の住人たちが繰り広げる AVG , 「め 
ぞん一刻 j が帰ってきた。今回は一刻館に八神が 
転がり込んで，またまた五代と響子，そしてお馴染 
みの住人たちを交えて大騷動が巻き起こる。果た 
して五代は本人に向かって「響子さん好きじや一」 
コールができるのだろうか。そして響子さんの花 
嫁姿を最後には見られるのだろうか。 

XI / XI turbo 用 5"2 D 版2枚組7,800円 

マイクロキャビン 00593(51)6482 

★第4のユニット2 

4月号のゲーム特集で，ユニークなゲーム構成 
で好評だったあの「第4のユニット」が，さらにバ 
ージョンアップしての登場だ。メッセージは前作 
の2倍，パワーアップされた戦闘モード。新たな 
強敵ダルジイの登場によって，ハードアクション. 
ハイパ—パト ルの 世界が，いま再び始動する。 
Xl / X 1 turbo 用 5"2 D 版3枚組7,600円 

データウェスト Q 06(968)1236 

★ソリテイア • ロイヤル 

トランプゲームのピラミッド，ゴルフ，クロン 
ダイク，シャッフル&ドロー，神経衰弱など11種 
類の力ードゲ_ムを集めた「ソリティア•ロイヤ 
ル」が発売される。力ードゲームは遊びの基本， 
さらにそのなかから，アメリカで人気のある力一 



イース II 

ドゲームを一挙に集め，それらの1つひとつのゲ 
ームで高得点を目指すプレイモードと，すべての 
ジャンルの卜一タルで勝敗を競うツアーモードの 
2つのモードがあり，それぞれ得点がセーブされ 
ハイスコア機能も付いている。また，初心者は練 
習モードで腕を磨いて本番に臨め，おまけにマウ 
ス対応の親切設計となっている。 

X1/X1turbo 用 5”2 D 版6,800円 

ゲームアーツ 303(984)1136 

☆ SUPER DEVICE MONITOR'T" 

この SUPER DEVICE MONITOR "!"" は，これまでパ 
ソコン通信でアスキーコードに一度変換してから 
オブジェクトデータを転送していたのに対し，こ 
のツールを使えば直接オブジェクトデータめまま 
特殊な圧縮方法を用いてデータを転送し，転送速 
度を従来の最高32倍までアップできる。このほか 
に姉妹品として X1/X1turbo 共用の 「SUPER DEVICE 
M 0 NIT 0 R “ T " j も発売されている。 

Xlturbo 用 5”2 D 版 13,000円 

BLUE SKY 00559(72)6710 

★億万長者 

ここ 数年の地価の上昇で「億万長者なる言葉に 
もあまり有難みがなくなってきた今日このごろ。 
しかし，いつの時代も大金持ちになる夢は捨て難 
いもので，せめてゲームのなかの世界だけでも憶 
万長者になる夢とチャンスを与えてくれるという 
のがこのソフトなのだ。要は各国の貨幣価値をにら 
みながら，株や商品相場などに手を出して持ち金 
を増やしつつ大邸宅やロールスロイスを持てる生 
活を追い求めるというもの。たとえゲームのなか 

“まにあ”の方必見のゲーム本が出た II 

「まにあ j の人が待ちに待ってた（らしいです。 
わたしはマニアじゃなかったから知らなかった 
けど…… ） テレビゲーム電視遊戯大全』が UPU 
から出ました！う一ん，もうこれは「スンゴイ 
デスネー」と所さんふうに驚くしかない本です 
よ！ だって，いきなり本のページが2つにも 
3つにもポコボコ切れてたり（どういうふうにな 
ってるかは実際に買ってみてのお楽しみね！）， 
油断してると本がバインダーになっているのに 
気づかずにページがばらけてしまったりと，見 
かけが油断のならない格好をしているうえに， 
内容が地獄の修羅界です。 

そう，アメリカ，日本，果てはイギリスやフ 
ランスまで含めた世界中のゲームに「どっぶり」 
なマニアック本なのです。ポン（これって世界 
最初の TV ゲームなんですよ！ 知ってた？）か 
ら R-TYPE までのゲーム家系図（本当の名はゲー 
ムマップという），古今東西のゲーム名簿（終電 
の電車のなかでこれを友だちと見ると「あ，ギャ 
ラガだ懐かしいな一 j ， 「ローグまであるう！ j 



卜 一 jL \ 


だけとはいえ，大金持ちになったときの気分とい 
うのは，やはりなんともいえない快感だったりす 
るのである。 

X 68000 用 5"2 HD 版9,800円 

コスモス.コンピューター 303(770)1821 
☆ドーム 

システムサコムがすでに XI 版で発表しているノ 
ベルウェアシリーズの「ドーム」が X 68000 に移植さ 
れた。内容は，都市をガラス状のドームで覆って 
放射能汚染から人類を守ろうとスタートされたプ 
ロジェクト「ザ.ドーム計画」。そのドーム計画に 
絡んで聞にうごめく数多くの人間たち。果たして 
このドームに隠されている真実とは，いったいど 

のようなものなのだろう力 . 。画像取り込みを 

多用したグラフックやマルチウィンドウ，そして 
文字表示スピード設定機能など， X 68000 ならでは 
の工夫が随所に見受けられる新作ソフトだ。 

X 68000 用 5"2 HD 版5枚組9,800円 

システムサコム 003 (635) 7609 


と騒音地獄と化す），揚げ句の果てには遠藤雅伸 
さんからポールブレイザーのデビッドフォック 
スさんまで世界中のゲーム作家にインタビュー 
しまくってしまうものすごいパワーです。その 
パワーはこれからゲームを作ってみたいと思う 
人に，非常にはっきりとゲームの思想を見せて 
くれます。ゲームが好きな人なら35回ゲームを 
我'優しても買う価値のある必見の丨冊だと思い 
ます。 （で） 



UPU S 03 (235) 7561 
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GAME 

REVIEW 

今月は X 68000 に魔神宮の統編「グランド • 
マスター」を，そして XI にはちよっと夕 
イプの違った将棋練習用ソフトと野球ゲ 
ームをご用意しました0いずれも派手さ 
はないけれど，工夫の見られるゲームで 
すので，ごゆっくりお楽しみください。 
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グランド•マスター 

大陸グランツで繰り広げられるフアンタジ 
一 RPG の世界。中央に開いた丸いウィンド 
ウが斬新だ。 


►宝珠の向こうに見えるものは，大陸グラ 
ンツだった。このグランド•マスターは， 
X 68000 の得意技であるウインドウを パ、シパ、 
シ 使って，小気味よいゲームである。本格 
的 RPG が少なくなっているなかで，これは 
掘り出しものソフトといえる。店のおっち 
やんにはスパイを頼まれるわ，おばはんに 
は手紙を渡されるわで，私は信頼されてい 
るのだなあと実感できる仕組みである。し 
かし，十分なお礼をするからという甘い言 
葉を信じて引き受けても，渡されるのは雀 
の涙ほどの金額である。このようにこのゲ 
ームは登場キャラとの会話も楽しめる。獅 
子が子を谷底へ突き落すように，バンバン 
戦って生き残った者だけを集めて最強メン 
バーを組むのだ。そうすれば，マップが見 
にくいだとか，敵は貧乏だとか，魔法は役 
立たずだとかいう文句は聞こえなくなり， 
余裕で戦いを満喫できるだろう。 X 68000 で 
本格的 RPG を楽しみたい人にはお勧めの1 
本といえる。 

熱中度 ►►►►>>> ( A . N .) 

►極めてアリガチなタイプの RPG である。 
ゲーム 自体はそれほど難しいわけではない0 
どちらかというと謎解きがメインで，敵は 
それほど出てこないからだ。行く先々でい 
ろいろなことを頼,れるという ソーサ リア 
ンタイプの ゲームな のである。 



つまるところ最近の流行をミックスして 
できた，ごく一般的な RPG といったところ 
であるから， RPG をやってみたいという人 
や，長〈楽しみたいという人にはいいかも 
しれない。 

しかしこのゲームにはかなり不満がある ( 
あまりにも X 68000 の性能に甘えているのだ< 
X 68000 をもってすればこのぐらいのゲーム 
は少し腕の立つ人だったら簡単に作れる。 
X 68000 なんだから画面構成にしろ操作性に 
しろもっとマトモにできるはずなのに。も 
う少し努力してほしいものだ。 

それに マニュアル も最低である。もっと 
丁寧に書いてくれないと，なにがなんだか 
わからないじやないか 0 プンプン。 

熱中度 ► ► ► 0 0 0 [> ( C . W .) 

X 68000 用 5〃2 HD 版2枚組9,800円 

ザイン•ソフト 00794(31)7453 


振飛車 


これは実際にプレイするのではなく，問題 
を解きながら，または対局譜を見ながら実 
カアップを図る練習用将棋ソフトなのだ。 



ゲーム 要素 


ノ くランス 


ドウの数 



ビジュアル 


►え？ これってゲームレビューでしよ0 
このソフト，ゲームというよりは「教育ソ 
フト」じやないかと思うんですけど……。 
なんとこのソフトはあらかじめシナリオ(フ° 
口の指した棋譜だそうな）が決まっていて， 
ポイントとなる場面で4択式の問題が出さ 
れ選んだ手によって点数が加算され，プレ 
イヤーが何級であるかを認定してくれる「将 
棋版オート家庭教師」というとんでもない 
ソフトなのです。そこで，私も実際に問題 
を解いてみたのですが……。エーン，なん 
なんだよこれは一っ！！問題のヒントが「厚 
く指したい」とか，「5二飛に対応する動 
きは」とか，なんだかよ〈わからないヒン 
卜ばかりのくせに（単に私が無知なだけだ 
が)，人がチョツト指し違えたぐらいで「悪 
手」と力、「不満が残る」とかいってすぐ0 
点付けるんだもんな 一。 へ夕で悪かったね， 















































へ夕で！どうせ指導するなら，もっと親 
切に指導してよね一。ぶつぶつ……。 

熱中度 ►►►>>>> (で） 

►わたしや，いままで将棋ソフトなんても 
ん買ったことがありません。まあ，単純に 
将棋が下手だから，という理由ですけどね。 
そんな私が一目置いたこの将棋ソフトは， 
コンピュータを相手に勝負す る ものではあ 
りません。 

こいつは， プロが指した手を画面上に展 
開していって，何手か指したときに「ここで 
問題です。あなたなら次の一手，どうす旨し 
ますか？」なんていうスポーツ新聞の片隅 
でやってるようなことを， パソコンで やっ 
てくれるのです。収められている問題は初 
級から上級まで全部で30局あって，さらに， 
一局に つき 10個問題が用意されています。 
解答の方法も番号を選ぶだけで，至って簡 
単なんですよね。おまけに，棋力認定ソフ 
卜なんて肩書きも持っていて，段•級位を 
教えてくれます。まさに，至れり尽くせり 
のソフトなんです。でも，でもね，操作性 
の惡さがこのソフトの全体のイメージを落 
としています。それでも，将棋好きのマイホ 




ゲーム 要素 バランス 


難解なヒント 



ームパパなら満足するかな？ 

熱中度 ► ► ► > 0 0 0 ( H . K .) 

Xlturbo 用 5"2 D 版2枚組7,800円 

ビクター音楽産業 003(423)7901 


Mr . プロ野球 


常にリーグ優勝を目指しながらも，他球団 
との駆け引きや球団運営まで，幅広い監督 
としての S 配がものをいう野球ゲームだ0 


►先日，東京ドームへ日ハムー南海戦を見 
に行った。南海が負けたので悲しかった。 
誰かが東京ドームの野球は“箱庭野球”だ 
といっていたが，まったくそのとおりだ。 
きれいで風もないし，寒くないのはいいか 
もしれないが，失ったもののほうが多いと 
私は思う。どうせ箱庭野球なら 「 Mr . プロ 
野球」のほうがときどき手を下せるだけ面 
白い。たまに試合に目をやって，危ないと思 
ったら投手をブルペンへ派遣し交代させれ 
ばいい。 TV を見ていて「あっ，俺だった 
らこうするのに」を実際にできるのだ。試 
合終了後，なけなしの資金でチーム強化策 
を考える。オーダーとローテーションで悩 
み，試合が始まったら適当に観戦しながら 
手を下せばいいから，究極のヒマつぶしソ 
フトといえよう。私は中日を選び，巨人， 
西武，南海，大洋でリーグを作ったが，弱 
そうなチームばかりを相手にするのもよい。 
昨日，落合が故障して全治6日と診断され 
た。戦力低下が心配だ。気合いモードが欲 



ゲーム 要素 パランス 

宝くじ 



野球 ゲーム 操作性 


サウンド 


接待 



球団運営 


選手管理 ， v アイデア 
ビジュアル 


や，選手の訓練，果ては写真週刊誌対策ま 
でしなければならない。このあたりは，い 
わゆる経営 シミュレーションゲームになつ 
ているのだが，あれもこれもと欲張ってピ 


しい。 

熱中度 ►►►►>>> ( K ) 

►球場が横向きになった風変りな野球ゲー 
ムである0ボールも投げなきや，バットも 
振らない。やることは選手の交代，盗塁の 
指示など，っまり監督さんである。勝って 
いればいいが，負けてくると「この馬鹿」 
などと罵り，「俺に打たせろ！」と騒ぎ，「明 
日は特訓だ」と堅く心に誓うのだった。 

試合が終わると，なぜかいきなりオーナ 
一になって球団の雑務をする。球場の整備 

時代はし〇も諸行無常なのである 

何年たっても九段下駅前の地下工事は終わら 
ない。しかし，ほかでは時は流れて風は吹くの 
である。ゲームだって昔よりきれいな絵であり 
たいし，たくさんデータが欲しいと思うのであ 
る。メモリだってたくさん食べたい。最近 Xltu 
rbo 専用のゲームが多いとか，さらには2ドライ 
ブ専用が多いなどとお嘆きの貴兄が多いが，ゲ 
ーム屋さんだっていろいろな注文に対応するの 
はたいへんなのである。 

確かに， XI でも作れそうなものを Xlturbo 専 


ンからキリまでいろいろな要素を混ぜたた 
めに，全体的には散漫になっているような 
気もする。 

これを1年分繰り返して，最後に優勝し 
ていなければならない。あまり優勝できな 
いとクビになる。この本が出るころも巨人 
は負け続けているのだろうか。 

熱中度 ►►►>!>>[> ( M . Y .) 

X 1/ X 1 turbo 用 5〃2 D 版2枚組7,500円 

(要漢 ROM , 2ドライブ専用） 

ブラザーエ業 0052(263)5895 


用にしてしまうのは，ソフトハウスの怠慢以外 
のなにものでもない。だが，このところの事情 
は変わりつつある。88なんかとうの昔に SR 以 
降の機種に絞られたし， AV より前の7/77も切り 
捨てられてしまったではないか。しかもよく考 
えてみると， XI よりも Xlturbo のほうが機能が 
高いわけだから（値段も高いし），同じソフトし 
か走らないとしたら XI turbo ユーザーは損である。 
元 MZ - 2500ユーザーの私から見れば，5年以上 
も前のハードで最新ソフトを出せというのはわ 
がままだと思う。そりゃ Xltwin ユーザーには悪 
い気はするけど。 （ K ) 
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•ソーサリアン(その l ) 



RPG の戴!を学ぶ 
飼の出る順攻略法 


Nishikawa Zen // 

西川善司 


待望のソーサリアンがついに我々の前に 
姿を現した0このゲームはぜひともみん 
なが納得するまでレポートしてあげたい。 
というわけで IV 1& M に引き続き，「完結す 
るまで何力月でもご紹介シリーズ」がこ 
こに再び復活するのです。 



Xlturbo 用 5"2 D 版5枚組9,800円 

( modellO では要 CZ - 阳 GR 2, CZ - BBF 1) 
日本ファルコ厶 00425(27)6501 


それではスタートのご 挨拶— 

このゲームには特にそれらしいストーリ 
一はありません。全体を流れるストーリー 
というより，“ペンタウァ”というソーサリ 
アンの町にかかわる数々の試練（冒険）を 
キャラクターが乗り越えていくことにより， 
自分だけの「ソーサリアン」の世界を作っ 
ていくというゲームなんです。普通の RPG 
のように，ひとつの（ゲームの作者がお膳 
立てした）ストーリーをただ追いかけるの 
ではないのです。 

ですから，プレイヤーがキャラクターを 
生み出したときから，彼らの生活が始まる 
わけです（ファイターという冒険者として 
の役割を持ちながらも，冒険に行かないと 
きには町で鍛冶屋をやっていたりする）。 
こういう RPG の観念には，正直いって私は 
驚きました。このソフトの9,800円は安く 
はないけれど，決して高くはありません。 

朴ラクタ-仰が 重要— 

さあ，ノリのいい BGM にのってキヤラ 
クター作りといきましょう。作れるキャラ 
クターの種族は4種類，ファイター，ドヮ 
ーフ， エルフ， ウイザードです 0 作れるキ 
ャラクターは10人まで。ちょっとここでア 
ドバイス。もちろん10人全部作るのも結構。 
ただし，ソーサリアンは冒険に出て帰って 
くると1年が過ぎてしまいます（冒険に出 
たキャラが1歳年をとるのはもちろん，町 
に残ったキャラクターたちも年をとる)。シ 
ナリオは15個ありますから，これらを全部 
クリアするのには最低 ゲーム 上で15年かか 
るということです。 

生まれたてのキャラクターは，最年少で 
もすでに16歳ですから，15のシナリオをす 
ベてクリアすると，最高で16 + 15 = 31歳に 
なってしまいます（まず，こんな若さで終 
わることはあり得ないが)。 

すると，今日はこのキャラクターで冒険 
しよう，今日はこっちのキャラだ，とやっ 
ていると全体的にオジンキャラの集団にな 
ってしまいます（この場合，ちゃんとジイ 
さん，パ、アさんのグラフィックになるとこ 
ろがまた芸が細かい)。 

それに，ファイターやウイザードはほっ 
といても60歳くらいで寿命をまっとうして 
しまいますから，なるべく特定のキャラで 
遊ぶのがいいでしょう。一度エンデイング 
を見たあと，ゆっくりと「ソーサリアン」の 
世界に浸るというのも悪〈ありません。 

話をキャラクター作りに戻しましょう。 
マニュアルを 読んでの とおり， INT (イン 


テリジェンス，知力）が0以下だと魔法が 
使えません（ソーサリアンは顔じやなかっ 
た魔法が命です)。ファイター，ドワーフは 
INT がマイナスですから，魔法は使えない 
と思われます力、実は修行などをして INT 
をプラスにすれば使えるようになります（マ 
ニユアル参照のこと）〇 

ただし，修行して無理やりプラスにして 
もファイターなどは，レベルが’上•がるたび 
に INT が{威ってきてしまいますからいつか 
はマイナスになってしまいます。これを， 
なんとか防ぐ方法はキャラクター制作時に 
BONUS 値を INT に多めに割り振ってやる 
のです（もちろん BONUS 値だけではブラ 
スにならないかもしれないけど)。 

要するに，キャラ制作時における BONU 
S 値の割り振りは今後のキャラクターのレ 
ベルアツ プ時のパラメータの変化に対して 
加速度的な役割をするということなのです。 
ちなみに，私のドワーフの男はキャラ制作 
時に IN 丁に BONUS 値を与えすぎたので， 
魔法 ONLY の剣の振れない奴になってしま 
った（ドワーフなのに STR がマイナスとい 
うのが怖い)。決してひとつのパラメータば 
かりに値を集中させないように！ 

正しいキャラクターの 作り方^^— 

ソーサリアンでは， RPG お決まりのパタ 
ーンのファイター，ウィザードなどの種族 
を決定したほかに職業を60種のなかから選 
ベます。この職業というのは，冒険をしな 
いキャラクターが（冒険に出かけたキャラ 
クターが帰って来るまで)，町でなにをやっ 
て過ごしているかというものです。1年間 
同じ仕事についていると，ある程度の経験 
値が貰え，キャラクターのパラメータ （ST 
R ， INT など）が変化します。つまり職業と 
パラメータは密接な関係にあるのです。私 
は鍛冶屋がなかなか美味しいと思うんです 
が（ちなみにデフオルトは農夫です)〇 

キヤ ラク ターの パラメータは， ゲームに 
とても大きな影響を与えます。たとえば， 

高レベルのシナリオになればなるほど，扉 



BOB GUILD 


かつてほしい & の »»1 


芒とにて令 • 


ABMS 空〇つて UtUu 


BOD 夺ろク Tt* しい ♦ 


ARMOR 0 今しい * 


ROBE « ろゥ TUtUu 


SHIELD^^TUtUu 


RING $ ろ 9 TUt しい ♦ 


最初はまず50ゴールド持ってお買い物 
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が重〈なって ， VIT (活力，腕力）の値が 
小さぃと開きません（ちなみに「呪われた 
クイーン マリー号」では VIT が27〜28以上 
なぃと扉が開かなぃ )〇 また， レベルの 高ぃ 
シナリオでは，敵の攻搫力が上がってぃま 
すから PRT (防御力）も高くなぃと，死ん 
でしまうかもしれません。 パラメータの バ 
ラつ きが見え始めたら速やかに町の道場へ 
行きましょう。 

えっ？ 修業は2年もかかるからイヤだ 
って？ 馬鹿なことぃっちゃあぃけません。 
88版なんか3年かかるんですからねっ（お 
か ( f で私が先に終わらせた88版のキャラた 
ちは全シナリオクリア時には全員ジイちゃ 
ん，パ、アちゃんになってしまった)。もっと 
も KRM (カルマ）の値を上げれば1年で修 
業を終えさせてくれますけど。さらに，道 
場では特殊な知識を修得することができま 
す0得られる知識はアイテム，罠，モンス 
ター，ハーブの 4つですが，私が思うに， 
実際になぃと困るのはアイテムと罠の知識 
<らぃでしょう。 

アィテムと魔法の話 ■■■ ■ ■ 

あの名作と呼ばれたウィザードリィゃフ 
アンタジアンなどのように，アイテムはた 
くさん集められますが，ソーサリアンでは 
絶対に 

魔法> アイテム 

なんです。そう，ソーサリアンは魔法が命 
です。人形は顔が命です。 

ソーサリアンにおぃては，装備すること 
のできるアイテムにはすべて魔法がかかっ 
てぃます。しかし，その魔法はすべて町で 
売ってぃるアイテムにも，お金を払えばか 
けることもできるんです。ですから冒険中 
で得られたアイテムは，売ってしまってぃ 
ぃと私は思ぃます。おっ.と，アキカンが飛 
んできた。えっ？ ああそうだ，忘れてた。 
冒険中に得たアイテムは売る前に必ずアイ 
テムの知識を持ってぃるキャラクターで一 
度鑑定してから売るようにしましょう。な 
ぜかって？じゃあ，その理由をお話しま 
しょラ c 

ソーサリアンの魔法は火 M ， 水星，木星， 
月，太陽，金星，上显の7っの魔法の要素 
の組み合わせによって魔法がかかることは， 
マニュアルを 読んですでにご存じのことか 
と思ぃます。そして，火星は STR (攻撃力）， 
水星は INT ， 木 M は……（以ド マニュアル 
参照のこい，などのパラメータを上げる効 
果があります。火星が5個かかってぃると 
すると STR が5つ増えるわけです。ですか 
ら魔法の使えないキャラクターでもパラメ 



左上から順番に「呪わ 
れたクイーンマリー号 j , 
「失われたタリスマン山 
そして「ロマンシア」で 
す。ソーサリアンでは, 
このようにそれぞれの 
シナリオによつて舞台 
となる場所が工夫され 
ていて，楽しさ倍増の 
大サービス 



ータを上げる手段としてアイテムに魔法を 
かけるのもいいでしよう（修行をするより 
こっちのほうが早いし)。 

たとえば， SUN RAY という魔法は，火 
星，木星，太陽，金星がアイテム（もちろ 
んどんなアイテムでもいい〉に宿ると使え 
るようになるのですが，冒険で得られるガ 
ラディーンという剣にも SUN RAY の魔法 
がかかっています。しかし，鑑定してみれ 
ば判ると思いますが，ガラディーンには， 
な，なんと火星が10個，太陽が6個かかっ 
ているのです！ここでなにを興衡してい 
るかというと，町では同じ魔法の要素は5 
個までしかかけられませんから，これはラ 
ツキーというわけです。火星10個といえば 
攻撃力が10も上がるんですよ。こういうア 
イテムを売ってしまっては大損ですね。と 
いうわけですから，アイテムは売る前に鑑 
定しましよう。 

魔法の話が出てきたところで，耳よりな 
情報をひとつだけここで紹介しておきまし 
よう力4表1も兒てね）。これまで読んでい 
ただいた文章には，実は誤りがひとつ含ま 
れています。それはどこかというと，「魔法 
をかけてもらうのは修行より早い」なんて 
書いてあったところです。おお，善司はな 
んて「タワヶ」なんだと思った方もおられ 
たでしよう。だって マニュアルに 「修行は 
2年かかり，魔法はひとつの要素をかけ終 


わるのに3年かかる」とありますものね。 

それでは，試しに武器屋で適当なものを 
買ってきて，魔法屋に行ってみてください。 
そして，適当な魔法をひとつかけてもらっ 
てください。すると「3年かかりますけど 
いいですか？」と聞いてきますね。ここで 
当然 「 OK 」 を選択します。そして次に預け 
たものを返してもらうを選びます。すると 
「魔法をかけ終わるまであと3年かかります 
がそれでもいいですか？」と聞いてきます。 
もちろんここでも 「 OK 」 を選択し’てしまい 
ましよう。さあ，魔法屋を出ます。もうこ 
れで魔法はかかっているのですから。ウソ 
一！といって信じられない貴兄は長老の 
家で鑑定してもらって確かめてみましよう。 

た，ただしです！！ここに大きな落とし 
穴があるのです。たとえば HEAL の魔法を 
かけようと思って，この方法で木星，太陽 
とかけてもらっても，冒険中に HEAL の魔 
法は使えません。「えええ，どうしてっ，ち 
ゃんと木星，太陽が宿っているのにい！」 
といわれそうですが，使えないものは使え 
ないのです。「じゃあ，最初の方法はパラメ 
ータを上げるときにしか使えないのかあ」 

と思ったあなた，それはアマイ。たとえば， 
SUN RAY をかける場合を考えると，火星， 
太陽，木星は最初の方法 （3 年待たない） 
でかける。そして最後の水星を普通にかけ 
て（要するに3年侍つ）もらえば大丈夫。冒 
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険中にはちゃんと SUN RAY の魔法が使え 
ます。「それじゃ，この方法をとればどんな 
魔法も3年でかけられるわけか」と1吾った 
あなた，それで正解。よく，理解できなか 
った人はもう一度読み直してみてね。これ 
を知っておかないと， ソーサ リアンはとて 
も一世代で全シナリオをクリアできるほど 
あまくはできていないのですよ。 

ところで'，さっきの SUN RAY ですが， 
これは火星，木星，太陽，金星が宿れば使 
えるといったのに， かける 魔法は火星，太 
陽，木星，水星だなんておかしいじゃない 
か，と思ったあなた，スルドイ〇これはど 
ういうことかというと，魔法の要素は互い 
に強めあったり，打ち消しあったりするの 
です。具体的にいうと，土星の かかって い 
る アイテムに 土星を かける と土星 x 2とな 
りますが ，月に火星を かける と打ち消しあ 
って 消えてしまうのです。あるいは木星の 
かかって いるアイ テムに 水星を かける と， 
木星と火星が宿ってしまうというぐあいな 
のです。このへんが魔法を かける 難しいと 
ころですね。 

よぅやくシナリオ_ |丨丨 I 

さて，やっとシナリオの話になるのです 
が，このゲーム，シナリオが15個あること 
は先に述べましたね。果たして先に発売さ 
れた88版とシナリオは一緒なんでしようか。 
88版を全部解いたと，先月から自慢して歩 
いている吉田賢司君18歳恋人募集中（組曲 
「 Ysj で一緒に仕事をした人です)に，ここ 
で聞いてみることにしましよう。 

「おおい，吉田君，88版と XI 版との違いは 
なんなの？」 

「音楽の一部と表2どぁ一」 

といって彼は去って行きました（変な人で 
す彼は)。そう，88版とは明らかにどこか違 
っているようです。それは表2を見てもら 
うとして，私も先日やっと全部のシナリオ 
を解き終えたので，これからいくつか取り 
上げて，その一部を教授しましよう。 
シナリオ I (レベル1 ) 消えた王様の杖 

これは誰もが最初にやろうとするシナリ 
才ですね。でも，このシナリオは結構難し 
いと思います0マップがレベル1にしては 
広いので，どの穴（扉）がどこにつながっ 
ているかをメモったほうがいいかもしれま 
せん。それ!：隐れアイテムの位置が88版と 
違っているようです。 

そうそう，いい忘れました。このシナリ 
才のように，アイテムを持ち帰るようなこ 
とを目的とするシナリオがいくつかありま 
すね。目的のものを持って帰ると，そのア 


イテムを献上するか聞いてきますが，別に 
献上しなくても構いません0そのアイテム 
が装備できるものであれば，身に付けて次 
の冒険中に使うこともできるのです。別に 
KRM が減ったりしませんよ，ただ，気持 
ちがスッキリしませんから，1回目はちゃ 
んと献上してもう1回そのシナリオをプレ 
イしたときは自分のものにしちゃうという 
のが正しい楽しみ方だと思います（同じシ 
ナリオは何度もプレイできます。念のため)。 
I (レベル 2) 失われたタリスマン 
このシナリオに出てくる教祖が倒せない 
人は，まだキャラクターが弱いということ 
です。レベル1のシナリオで修行を積みま 
しよう。ちなみに，このシナリオのデカキ 
ャラ「サンドマリボー」は，なかなか簡単 
には出てきません。 

I (レベル 4) 呪われたオアシス 
ひたすら疲れるシナリオです。同じ場所 
を何度も行ったり来たりしなくてはいけな 

いという . 。なんで油壺はいっぺんにた 

くさん取れないんだっ！ 

I (レベル 5) 盗賊たちの塔 
これは，かなり難しい。シナリオ中盤， 
地下水路に落とされますが，あの水路には 
トラップがありますよ。この地下水路には 
後半にもう一度行くことになります。なぜ 
行くのかはプレイしてればわかってきます0 
シナリオ n (レベル1 ) 暗き沼の魔法使い 
このシナリオでは一部マッビングが必要 
です。それからアイテムを見つけたからと 
いって全部取っちゃうと，あとでたいへん。 
バシバシ2段ジャンプを使って動き回れば， 
ピコッ t 取れるはずです。 
n (レベル 2 ) ロマン シア 

これは簡単。ロマンシアのオリジナル版 
とは比べものにならないほど簡単になって 
います。モンスターはバシバシ殺しても K 
RM は減らないし，陰険なニセ物アイテム 
もないし。突然ですが，病気を治す仕事な 
んかは絶対にプロに任せるべきですよ。え 
っ， プログラマのことかって？ それはあ 
なた，病気になりやすいプロのことでしよ 
(意味不明の会話を交わしつつ次へと進むの 
です)。 

Q (レベル 3) 紅玉の謎 

これはた〈さんある鳥の巣のなかを見て 
回るのがひとつのテでしようね，きっと。 

Q (レベル 5) 呪われたクイーンマリー号 
このシナリオはとにかく凄い。国産 RP 
G のなかじゃピカイチのシナリオでしよう。 
これ単体で売っても，恥ずかしくないくら 
いよく練られています。聞き込みをして殺 
人犯人を捜すところなんか，まるで「マン 



死者復活の実験を阻止する「氷の洞窟 j 



伝説の聖水を求めて旅立つ「不老長寿の水 j 
ハツ タン • レクイエム」 みたいだけど， こ 
れが後半になって，悪魔が関係して きたり 


して……。 

いままでファンタジー RPG というと，ダ 
ンジョンのなかをさまようのが普通だった 
けど，このシナリオはなんといっても舞台 
が船中というのがいい。 

ただし，このシナリオは長いから初めて 
やったときは3〜4時間かかりました。こ 
のシナリオに限っては，腰を据えてじっく 
りやったほうがいいでしよう（人にプレイ 
して見せたら寝てしまう人まで出た，とい 
うほど長い)。 

シナリオ in (レベル 1 ) 天の神々たち 

このシナリオはいちばんやさしい（と思 
う)。経験値稼ぎにはもってこいです。ちな 
みに，このシナリオで手に入る「神の腕輪 j 
はなかなか使えるアイテムですよ。初めて 
プレイする人は「消えた王様の杖」をやる 
よりこっちのほうがいいかもしれません。 
in (レベル 2 ) 氷の洞窟 

ここはけっこう難しい。「このシナリオに 
は FLY の魔法がないとだめなのかなぁ」な 
んて思わないように。 FLY を使わないと解 
けないシナリオなんてものはありませんよ。 
FLY はほとんど「トラップからの脱出用」， 
または「隠れアイテム探し用」の魔法です 
から。 

瓜（レベル3 ) メデューサの首 

このシナリオは，私は「呪われたクイーン 
マリー号」の次に好きです。 

廃坑のメデューサは初めからお目にかか 
れますけど，絶対倒せませんよ。でも一度 
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会わないとだめなんですよね，これが。そ 
して廃坑の天井から声が……。 

1(レベル 4) 囚われた魔法使い 
な，なにもいいません。このシナリオに 
関しては。だって最後が……。 

瓜（レベル 5) 不老長寿の水 

このシナリオ，レベル5にしては簡単。 
ただし，このシナリオの最強 （？） の敵ド 
ッペルゲンガーには 気をつけろ！ いつの 
間にか，パーテイのキヤラクターが敵にす 
り変わっているぞ！ だから，このシナリ 
才をやるにはある魔法が絶対に必要不可欠 
なのです。 

DP - 音楽は さすがです— 

このソーサリアンのシナリオデイスク m 
って，音楽が88版より少ないみたいだなあ。 
ディスクの容量の都合かなあ。そう，音楽 
といえば， Xlturbo 版ソーサリアンの音楽 
は凄い。ゲーム中に FM 8 声 + PSG 3 声= 
11和音を鳴らしているんですよね。多少曲 
も88版のものからアレンジされていたり， 
どうやら88版にはない曲までもあったりし 
て全部で60曲近く入っているらしいので， 
ぜひ， ステレオに つないで聞いてみてくだ 
さい。 

あ，そうそう，ミュージックモードを兑 
つけた方，絶体に「西川善司のソーサリア 
ン，ミュージックモードめっけ係」までお 
便りください（私はいかなる手段を使って 
も，このミュージックモードのありかを知 
りたい）。 


そのほか魔法の情報，ハーブの情報，また 
は，このシナリオが解けないよう，といつ 
た内容のお便りもこの西川善司はお待ちし 
ております。 

とにかくこのソーサリアンは，早解きは 
なるべくやらないようにしましよう。1つ 
ひとつのシナリオは短く，そしてそれほど 

表2吉田君のシナ 1 J 才採点表 


難しくもありませんから，別に早く解いて 
も偉くもなんともありません。それより， 
冒険中のキャラクターになりきり，「剣と魔 
法の世界」を思う存分，楽しんでください 
ね。きっと辛斤しい RPG の世•界が見えてくる 
はずですよ。 

それではまた来月。 


シナリオ名 

88版との相違度 

難易度 

理想的なプレイ順 

面倒くささ 

シナリオ I 

消えた王様の杖 

X 

3 

3 

4 

失われたタリスマン 

X 

3 

6 

3 

ルシフIルの水門 

X 

4 

9 

4 

呪われたオアシス 

X 

4 

10 

5 

盗賊たちの塔 

〇 

5 

15 

5 

シナリオ II 

暗き沼の魔法使い 

A 

1 

2 

2 

ロマンシア 

〇 

1 

4 

1 

紅玉の謎 

〇 

2 

7 

2 

暗黒の魔道師 

〇 

4 

12 

4 

呪われたクイーンマリー号 

〇 

5 

14 

5 

シナリオ I 

天の神々たち 

〇 

1 

1 

1 

氷の洞窟 

〇 

3 

5 

3 

メデューサの首 

〇 

3 

8 

3 

囚われた魔法使い 

〇 

2 

II 

4 

不老長寿の水 

〇 

2 

13 

4 


88版との相違度 
難易度 

理想的なプレイ順 
面倒くささ 


x :まったく違う 
難しい 5 -—— 


A :一部違う 
-I やさしい 


〇：まったく同じ 


吉田君の独断と偏見によるもの 

面倒くささとはシナリオを解くのに，どれくらいの時間がかかる 
か，ということも表しています 

面倒くさい 5 --- I 単純である 

(時間がかかる） （比較的すぐ終わることが可能） 


表1 魔法の作り方（ほんの一部) 


この表の見方：表中に軎かれている数字は要素をかける順番を示しています。〇の部分は 
順番を伏せてありますから，自分でその順番を探してみてください。 



魔法名 

火星 

水星 

木星 

月 

太陽 

金星 

土星 

便利度 （1—5) 

ANTI-MAGIC 



〇 

' 0 




1 

ASTRAL RRE 


〇 


〇 


〇 

〇 


ASTRAL WAVE 

1 



2 


3 



AIR SLASH 


1 

3 




2 


BARRIER 


1, 2 


4 

3 


5 

3 

CHANGE AIR 



1 

2 


3 


4 

CORROSION 


2 


1 



3 


CURE 





2 

1 


3 

D-C0RR0SI0N 


〇 

〇 

〇 

〇 


〇 


DEATH 

〇 



〇 

〇 

〇 

〇 

3 

DEG-DEATH 

2 



3 

1 

4 


3 

DEG-FIRE 

〇 

〇 

.〇 


〇 


〇 


DEG-NEEDLE 


3 



4 

2 

1 

5 

DISPEL 

〇 


〇 

6 


〇 



EXIT 

1 

3 



2 




EXOCISM 




3 

2 

1 


3 

FIRE FOX 


1, 2 


4 

3 




FLAME 

2 




1 




FREEZE 

2 




1 


3 

3 

GOD THUNDER 

〇 

〇 

〇 

〇 

〇 

〇 



HEAL 



1 


2 



5 + a 

HYPNOTIZE 

2 


1 



3 



ICE WALL 


〇 

〇 

〇 

〇 




ILLUSION 

1 





3 

2 


JET STORM 

〇 

〇 

〇 

〇 


〇 

〇 


LOST MORALE 




4 

3 

2 

1 
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行くぞ洞窟探検隊， 
クリスタルめつけ 


Shimizu Kazuto 

清水和人 


石にされたお姫様を救うため，我らが 
清水和人は地下にある20もの洞窟を旅 
するのだった。果たしてそこにはどん 
な怪物たちが待ち受けているのだろう 
か0いま9つのクリスタルを求めて壮絶 
な戦いが地下迷路で展開されようとし 
ている。 



xmjrbo 用 5〃2 D 版3枚組7,500円 

(modellO 不可, 2ドライブ専用） 
ゲームアーツ 003(984)1136 
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ひと昔前の RPG は退屈なものだった。限 
りない敵とのバトルで雀の涙ほどの経験値 
を得，わずかな金と食料を持って砂漠のよ 
うな単調な地形をただひたすら旅しなけれ 
ばならなかった。 

しかし，いまは違う。あたかもひと昔前 
の AVG のように，変化と波乱に満ちた目ま 
ぐるしい戦いと自分自身の推理力が必要な 
時代へと移り変わってきたのである。いつ 
の間にかこんなに進歩し， RPG は パソコン 
ゲームの 一角を 堂々 と担うようになってき 
たのだろうか。今回，これからご紹介する 
「ゼリアード」も，その昨今の RPG の流れ 
からして決して RPG という名に恥、じない変 
化に富んだ ゲームな のである。 

ゼリ アー ドは， RPG のなかでもリ アルタ 
イム RPG の ジャンルに 属し，マップのなか 
を移動し，そこで出会った人々から話を聞 
いたり，敵が登場すれば一戦交えることに 
なる。まあ，お馴染みのハイドライドやザ 
ナドウ（画面が縦だからどちらかといえば 
ザナドウに近いのかな）の パターン という 
わけだが，そこはそれ，ほかでは見ないよ 
うな工夫が随所に折り込まれているので楽 
しませてくれる。それではその世界を視い 
てみることにしよう。 

見事なイントロ I 

ゲームに入る前に，ストーリーを紹介し 
た紙芝居（絵が出てきてはストーリーが文 
字によって説明されるといういつものやつ） 
があるのだが，このゼリアードはそれ用の 
デイスクが1枚用意されているという凝りよ 
うだ。ずいぶんと長いオープニングで，は 
やる気持ちをじらされるわけだが，2回目か 
らは見なくてもいいようになるので最初は 
よ 一く見ておいたほうがいい。 

まあ，簡単に要約すればお姫様が石に変 
えられちまったんで，それを元に戻すため 
に9つのクリスタルを集めてくれば，めでた 
しめでたしということなのである。ちなみ 
にところどころでしゃべってくれるのはい 
いのだが，お姫様は本当に鈴のような声を 
しているというのがわかった。そういやあ， 
ゲームの いっちゃん最初にごちゃごちゃ聞 
こえたような気がした力 ? ，よく考えると 「P 
resented by GAMEARTS 」 といっていたら 
しい0 

で，オープニングが終わるといよいよゲ 
ー ムスタートだ。舞台はフェリシカ姫の住 
んでいるフェリシカ城から始まる。そうし 
てザナドウのようにムララの町に行って買 
い物をするってえ寸法だ。ただ，町をうろ 
ついていると，そこにいる人間たちがいろ 


んな情報を教えてくれる。このあたりは， 

スト—リーへ •の気配りが感じられて嬉しい0 

さて，そのムララの町情報のなかで重要 
になってくるのが，洞窟が8つあって怪獣 
がいるってぇことと，次の目的地は洞窟の 
なかにある「サトノ」という町らしいとい 
うことだ。さらには音のする扉があって， 
そこには魔物がいるってえことだ。つまり 
は，その扉のところで魔物をやっつければ 
次の洞窟に行けるという寸法らしい。 

まずは，町の商店街で買い物である。こ 
の私は買い物上手として一般世間に広く知 
られている力す，まずは“賢者の楣”を買っ 
た。“賢者の剣”というのもここでは売って 
いるが，この剣は1500ゴールドと高いし， 

“修行の剣”というのを最初から持っている 
から，とりあえずはそれでガマン。 K い消 
費者なのである。そのあと“セルドの薬” 
をいくつか買って残りのぉ金を貯金してか 
らスタートしよう（もしやられてしまうと 
復活するときに持ち金は全部取り上げられ 
てしまう）。 

洞窟のなかに入ったらとりあえずはボカ 
スカ敵をやっつけるのである力す，この敵が 
なかなか手強い。最初の洞窟はマリシア洞 
というやつなのだが，ここではカエルさん 
がいやな存在。だから間合いをはずして， 
ビヨンビヨンと跳ねて向かってくるところ 
をグサッとやるのがいい（ほかの洞窟には 
炎を吐くやつもいる）。コウモリもいるが， 
これはうまくやっつけると10アルマスが手 
に入る。このアルマスは金に換えることが 
でき，ムララの町では1アルマスは4ゴール 
ドになる。普通，怪物は1アルマスしか持っ 
ていないが，カエルとコウモリは10アルマ 
ス，またマリシアの洞窟の奥深くにいる背 
の高いやつも10アルマスになる0ここで稼 
いで，“賢者の剣”を買ぉう。 

やられそうになったら，“セルドの薬”を 
飲む。それがなくなったら地上へ引き返す。 
そして地上でやらなければいけないことは， 
1) 賢者に経験を見てもらう。 2) 銀行でアル 
マスを換金する。 3) 武器屋で楣を修理する。 




















4) 教会で休む（これは無料)。 5) 銀行に預金 
(郵便局では貯金と呼ばれている行為であ 
る）する。 6) 賢者のところに行ってセーブ 
する。といった順になる。もっともこの順 
番は町によって違う。体力が5の レベルに 
なると， ムラ ラの町の賢者アモーニはもう 
レベルアップして くれな〈なるので，よう 
やくそこで例の怪獣の扉を開けよう。洞窟 
内はマップを作らなければならないほど複 
雑ではないが，ここに行くとあそこに出る 
といったメモくらいは書いたほうがいいみ 
たい0 

我は行く,さらばムララよ 

例の扉のカギを開けると，デカキャラカ ？ 
ボンと出て〈る。しかし，それが終わると 
この面は閑育文としている。かくしてすんな 
りテンポよく，サトノの町に出られたので 
あった。このゲームでは，同じ面にいつま 
でも苦しめられるということは少ない。だ 
からこのテンポは RPG のなかではたいへん 
心地よい〇 

サトノの町にもひと通り店が揃っている。 
まず賢者ビュ エナ のと ころへ 行くと，最初 
の魔法“ エスパー ダ”がもらえる。薬屋で 
は魔法が回復する“リコブラーの薬”や楣 
を回復させる“アクロの聖水”を売ってい 
る力す，たいしてこれは役に立たない。ここ 
ではなんといっても最強の武器“マギアの 
石”を手に入れるべきである。 

この“マギアの石”は，体の周りを石が 
グルグル回って，防御と攻撃を同時にやっ 
てくれるという，宇宙艦ヤマトのアステ 
ロイドベルトみたいなやつだ。これを身に 
付けて走り回れば簡単にお金持ちにもなれ 
る。 

また，サトノの町での疲労回復は宿屋に 
泊まればいいのだが，これは30ゴールドと 
有料（まあ，安いけどね）。ある程度お金が 
たまったら2980ゴールド（ニッキュッパな 
んて，まあオシャレー）の“防石の楣”を 
買おぅ。 

ここらで剣の使い方を教授しておこう。 
ジャンプしたり，しゃがんだりしながら使 
うのはもちろんのこと，テンキーの8と2を 
同時に押して剣を縦に振り下ろすことや， 
ジャン フ°して降りてくるときテンキーの2を 
押して剣で下の敵を突く方法などは覚えて 
おいたほうがいい。ちなみにキー操作は非 
常に スムーズ だ。 

次のペリグロ洞の奥には，「開けるな」と 
いわれている箱があるが，かまわないから 
開けてしまえ。なかにはコウモリみたいな 
スレイヤーがいる（こいつは黄金パ、ットか） 


が，やっつければ体力が元に回復するのだ。 
まあ，やられたらセーブしたところからや 
り直せばいい。げに諸行無常よのう。 

でもって，この世界の親玉は大ダコのプ 
ルポ君（名前だけはカワイイ）だけど，ま 
たまた弱っちいデカキャラだったりするわ 
けだ。こんなのにやられているようでは， 
勇者と呼ばれるのはチャンチャラおかしい， 
となるわけである。 

我はもっと行く，さらばサトノよ _ 

プルポ君と戦ったあとは，マデーラ洞に 
出る。が ，そのすぐ左下あたりにはボスク 
エの村がある。ここでは，疲労回復にお役 
に立ちます薬の“ハンブルの実”や，6800 
ゴールドの“精霊の剣”を売っている。新 
い、魔法“セーダー”は射程距離や威力が 
グンとお得な攻撃用魔法である。そしてな 
んといっても おいしい のは，1アルマス6ゴ 
ールドという換金率。ここがほかの洞窟に 
比べていちばん良心的なわけだ。先の洞窟 
に行った勇者も必ずここに戻ってきて換金 
するという，伝説の銀行がこの村には存在 
するのである。 

ほかの町でもそうだが，魔法屋さんでは 
女の子が「いらっしゃいませ」とブリツ子 
な声で迎えてくれる。武器屋のオヤジは 
なにもしないで出て行くと「ひやかしなら 
出て行け」と机を叩く。宿屋の主人は泊ま 
るとき「はい，1名様ご案内」といってくれ 
る。このようにそこいらじゆうでよくしゃ 
べったりするのは，さすがゲームアーツ。 

さて，ボスクエから行くマデーラ洞，ラ 
イズ洞は樹の世界になっていて，ここでは 
いちばん太い澍の根元にある“勇者の紋章” 
を取らないことには先に進めないらしい。 

この世界あたりからメモを細かく取らない 
と，道に迷ってしまうかもしれない。 

そうして紋章が手に入ったら，今度はボ 
スクエ の村に行って番兵にそれを見せると 
いい。 するとなかに入れてくれて，巨大な 
火の鳥みたいなかっこしたデカキャラ•ポ 
ローがいる。それにしても，弱っちいやつ。 

我は行くんだってばあ 

ポローと遊んであげたあとにたどり着く 
のはスケートリンク，井上陽水の氷の世界 
だ（ちょっと古かったかな）。走っていて止 
まろうとするとツルリと滑ってガケから落 
ちたりするという， たいへん いやらしい世 
界なので，ガケの手前は要注意。エスカー 
チャ洞！：グラシアル洞を経て，ヘラダの町 
に出るのはこれまでになく困難なので，危 
なくなったら引き返してボスクェの村にす 



ポコポコと敵をやっつけるマギアの石 


かさず 戻ったほうがいい。ヘラダの町では 
あの“ マギアの石”を売っていないのて’，ボス 

クエの村で n っておいて，ヘラダでづだ々 
っておこう。そうすれば次からへラダでも 
買うことができるようになるのだ。 

ここでの新しい魔法は炎の“フエーゴ” 
だ。宿屋は70ゴールドと暴利をむさぼって 
いるし，1アルマス2ゴールドと換金率の惡 
さは最低0 “栄光の楣”が9800ゴールドする 
ので，これなんかとても買えないや。 

ここでの目的は，“ルゼリアの靴”を探す 
こと。これは目の前に見えている〈せに取 
れないという，とんでもなく厄介な場所に 
ある。そうそう，この面からいよいよ本気 
にならなければならないような雰囲気が漂 
ってきた。なにはともあれ，方向オンチの 
私はすぐに迷子になってしまうのでありま 
した。 

ここから先には，ようや〈その本性を発 
揮して〈る強っちいデカキャラが侍ってい 
るし，壁を壊さないと通れない場所や，一 
方通行のバリアが張ってある ヒころもあつ 
たりもして，だんだん難し〈なって〈る。 
こうした進行は決して単調にならないよう 
に次々と新しい展開を見せてくれて非常に 

レい。 

結局，このゼリアードはトントン拍子に 
プレイさせてくれて，終わったあとにさわ 
やかさが残るゲームだといえそうだが，そ 
うかといって簡単には解かせてくれるわけ 
ではない。このあたりの塩加減はとっても 
苦労して作ったんだろうなあ。で，肝心な 
お味はというと，とってもマルでした。 


THE S0FT0UCH 
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•アルギースの翼 



これこそエ画堂の 
RPG なのぢゃ 

Kuramochi Ryouichi 

倉持売一 


SF に中世のスタイルをマッチさせた新し 
い タイプの RPG ， それが 「アルギース の 
翼」だ。久びさに登場したエ画堂の最新 
作に，これまた本誌初登場の倉持亮一が， 
平和を守る戦士となって，悪戦苦闘の妖 
獣退治の旅に挑戦する。 



XI turbo 用 5"2 D 版2枚組7,800円 
(ただし FM 音源ボードがあれば X 〗でも動 
作可，2ドライブ専用） 

ェ画堂スタジオ »〇3 (353) 7784 
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宇宙の遙か彼方，第5銀河星団 a 星にア 
ルギース王国と呼ばれる国が栄えていた。 
もともとこの国は天空界にあったが，やが 
て地上界にも安住の地を求めて人々が移り 
住むようになった。そしてそのころからア 
ルギース王家には代々双子が生まれるよう 
になり，その2人の世継ぎが天空界と地上 
界をそれぞれ治めることを世襲としたので 
ある。 

しかし，地上界には以前から妖獣が生息 
していたのだが，それを地上界の王は民衆 
と地，水，風の3人の精霊とともに力を合 
わせて制圧し，平安の地として築き上げて 
きたのだった。そうしてアルギース第15代 
のとき3人の精霊に命じて天空界の扉を閉 
ざしたのであった。不可解なことに，天空 
界の扉を閉じたあと，アルギースの王家に 
はもはや双子は生まれなくなったのだが， 
あるときひとりの司法長がこういった「ア 
ルギースに異変が起きるそのとき，再び双 
子が生まれ，平和に向けて立ち上がるであ 
ろう」と。 

そしてアルギース第23代のとき，その言 
葉は現実のものとなった。過去に滅ぼした 
はずの妖獣たちのなかに高い知能を持った 
頭目が現れ，再びアルギースの国を脅かし 
始めたのだった。ついに国王と妃は殺され， 
城は廃墟と化した。民衆はもう妖獣たちに 
立ち向かう気力も失せ，ただぉびえたまま 
の日々を過ごしていたが，両親を殺された 
王子は，悲しみを胸にただひとり波乱に満 
ちた冒険へと旅立つのだった……。 


毎度シナリオには定評のあるエ画堂だが， 
しばらくのご無沙汰はあったものの相変わ 
らずストーリーは魅力的だ。特にラピュタ 
大好き人間にとっては「天空」という言葉 
を聞いただけでワクワクしてしまう。やは 
りこれからの RPG のヒーローはいつまでも 
地ベタにへばりついていてはいけない（ゼ 
リアードは確か地下が舞台だったな)。脳天 





見てよ （？） この会話。ストレートでしよ 


気なヒーローはやはりスーパーマンのよう 
に地上を離れて活躍すべきなのだ。と，張 
り切ったのまではいいけれど，この私の意 
に反してこのゲームはどんどん地上を舞台 
に展開してしまう。やがては天空界にも行 
くことになるのだが，結局はまた地上界に 
舞い戻ってしまう。せっかく魅力的なシナ 
リオだと感心してあげたのに，感心度の半 
分は返してもらおうっと。 

さて，ゲームはフイレスの町から始まる。 
地上界は大き〈分けて中央のマップを中心 
に東西に分かれていて，ちようどまん中に 
位置するこの町は薬屋や HP を回復するた 
めの休憩所，セーブを行う宿屋などがある 
ので，当面はここが拠点となる。アルギー 
スではあまり買い物に重点が置かれていな 
いので，店はあまり出てこない。売ってい 
るものもせいぜい HP 満タンにしてくれる 
薬か，そのうち相棒として活躍してくれる 
騰のエサを売っている店くらいのものであ 
る（この鷹は毎回エサをあげないと，次か 
ら働かないというわがままなやつだ)。 

武器屋はあるのだが，どこも品薄で剣， 
鏡，楣の3点セットが2つの町で売られて 
いるだけ（この2つはレベルが異なってい 
るけどね)。まっ，なんでも揃っているコン 
ビニエンスストアが2軒登場すると思えば 
よろしい。日頃から「なにが悲しゆうて， 
世界平和を取り戻そうとする正義のヒーロ 
一がせこせこ金を集めて武器を買う算段を 
しなけりやならんのだ」と思っているこの 
私にとって，このショッピング感覚は買い 
である。 



ひえ一，こんな文字読めないってば 



苦労して塔の上まで来たのに，扉は開かんのか 






































i 皆さんぼんとにご 親切^ 

旅立ちの町，フイレスの人はみんな親切 
だ。いやフイレスに限らずどの町の住人も， 
たったひとりで妖獣退治に出かけようなん 
ぞという物好きには愛想がいい。なにがど 
こにあるか，なにをどうするべきかなどを 
ハッキリと教えてくれる。たとえば， 

「この町の北のほうに膦匠の町があります」 
へえ 一， そうなんですか。 

「 tt 水の木馬”を使うとき，西の地への道 
が開かれるといわれています」 

そりゃどうも。 

「地の精霊はセルリノ山脈の中腹にある大 
きな木の前に現れると伝えられています」 
こりゃ，大切な話をご丁寧に。 

「南の山岳地帯が……」 

あの 一， もう少し回りくどくいってもら 
えないでしよう力、どうもストレートすぎ 
ちゃって，私はもう少しナゾを含んだヒン 
卜みたいなのを期待してるんですけど……〇 
てな，ぐあい。昔からのことわざにもある 
でしょ「親切は ゲーマーの ためならず」っ 
て（ちょっと違うような気もするが)。少し 
は遊んでる人間のことを考えてほしいもの 
である。 

まあそれはいいとして，町を出ると画面 
の右上に有視界マップが広がる。そこを卜 
コトコと歩いて行くと突然デイスタがカラ 
カラと回り出し，画面右下に妖獣がご登場 
である。ここで「戦う」コマンドを選ぶと， 
エ画堂お得意の戦闘モード（突然だがサイ 
キックウォーは どこへ 行ってしまったんで 
しょ）になる。戦闘中はただ高見の見物， 
「ホ レいけつ！」， 「ガンバ レ j とひたすら主 
人公の応援団をやってればいい。 

ただ，中盤戦ともなってくると「逃げる」 
とか「魔を飛ばす」などと緊迫した雰囲気 
を忘れて悠長な，ことも簡単にできるように 
なるので，比較的町から町への移動には苦 
労しなくなる0地上 マツ フ。では スクロール 
のスピードも速いので，アッという間に目 
的地に到達することができる。 

ァレッ，修行って簡単なのね 

オー グ マットと いう町では，またまたご 
親切なことにいきなり象形文字で書かれた 
古文書を見せられた。「王家の方なら読め 
ると 聞いて います」だと。読めないつ 一の， 
そんな文字。でも，ここで活躍するのがこ 
の ゲームのオマケ に 付いている 「翼龍の 書」 
という立派な装丁の虎の巻。ここにはアル 
ギース 前史，扱える魔法，精霊を呼び出す 
ときの呪文，古文書の正しい読み方（本当 



城のなかに入るのがまたひと苦労 


— 一 

の魔法って怖いくらい強力なのね 


はこん ないいかげんな呼び名ではない）な 
ど力 5 ' 記されている。とにかくこの本はオマ 
ケと 呼ぶにはあまりにも丁寧な作りだし， 

古いイメージを出すために紙質も凝ってい 
る。おまけにハードカバーに金の刻印とく 
りゃ，誰が見てもカッコイイ。 

まっ，それは置いといて，トキルという 
町には攻撃力をアップしてくれるという人 
がいる。この人に会うと， 

「攻撃力の修行をしてあげましょう。攻撃 
力を10上げるのに50ゴルダかかります。修 
行を受けますか？」 

と聞かれる。新しい剣もなかなか見つから 
ないので，ここで攻撃力でも上げておこう 
と50ゴルダを支払う0さあ，修行だ0する 
と突然， 

「修行は終わりました。また来なさい」 
エッ，もうおしまい。あれま，なにかしら 
のイベントがあると思ったら，たったひと 
言で終わりなの。どうも，また来なさいの 
言葉の裏には，「お金を持って」という接 
頭語が隠されているような気もするが，こ 
の修行は何度も受けるハメになるので，ど 
うやらそのたびにイベントなんぞやってら 
れない，ということらしい。でも，もう少し 
だけ「俺は強くなったぞ」という自信が持 
てるようなことが儀式としてあってもいい 
んじゃない。 

いつまでもお金を使って修行をしている 
わけにはいかないので，トキルの町で聞か 
された セル リノ山脈へと向かう。ゲーム 中 
に流れる BGM は軽快だ。 FM 音源対応のサ 
ウンドは，残念ながら8重和音を使いきっ 
てはいないが，聞いていると，ちょっと毛 
色が違っていてとても楽しい。ただ，ゲー 
ム構成とびったりマッチして いるかと いう 
と少々疑問だが，曲自身はよくできていて， 
従来の RPG の音楽とは一線を画している。 
特に町のシーンに流れる音楽は構成が新し 
いので，「俺は音楽にはチトうるさいぜ」 

と自負している人には，ぜひとも聞いてみ 
てほしい。 

さて，セルリノ山脈にある大きな木のと 
ころであれこれやっていると，突如画面が 


ピカピカッとフラッシュして地の精霊が現 
れた。 

「アル ギース の若き王子よ 0 よ〈参られた 0 

アル ギース の大地の嘆きはゎしの耳にも 
いておる。これなる“裂地の杖”をそなた 
につかわそう」 

おいおい， 自分のこと「わし」なんて呼 
ぶなよな。どう見たってあんたは若い女性 
の カッコし てるんだから。まっ，そんなこ 
んなでここから険しい山に囲まれた東の地 
へ行くことになるのである。 

職ノ I ワイ旅行にあと一歩 — 

このアルギースには，戦闘を有利にする 
アイテムのようなものがほとんど存在しな 
い。途中で手に入れることができるアイテ 
ムは，すべて次の地へ行くための通行証の 
ようなものばかり。そしてこれらのアイテ 
ムは，順序よくつながっているから，決し 
てプレイ中に惑わされることもなく，最終 
目的地へと向かうことができる。 

しかし，その素直さは認めるが，逆にい 
まひとつインパクトに欠けるような気がす 
る。アルギースの各地に点在する塔や城に 
は次の場所へのヒントが隠されていて，そ 
のために迷宮を歩き回ることになるのだ力す， 
その迷宮はそれほど複雑ではなく，面倒な 
マッピングも必要とはしない。これはたい 
へんユーザーフレンドリで，結構である。 
ただ，そこにピリッとくる味付けがもう少 
しほしかったのも事実。 

シナリオというものは AVG や RPG にと 
っては要となる部分だし，シナリオによっ 
てゲームの面白さが左右されることは，誰 
もが認めることだろう。しかし，完成され 
たシナリオには プレイ ヤーを ワクワク させ 
てくれるような演出が伴わなければ，せっ 
かくのシナリオのよさも生かされない。 

この アル ギースの翼という ゲームは， 脚 
本，美術，音楽のどれを取ってもたいへん 
よくできているのに，演出家の努力がいま 
ひとつという気がして少し残念だった。惜 
しいなあ，あと一歩でハワイ旅行だったの 
に……〇 
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• SUPER 大戦略 



いま熱く燃える 
勝利への長い道 


Kageyama HiroaKi 

影山裕昭 


前作はただの序章であった0この SUPER 
大戦略こそ本当の戦場なのだ。生産タイ 
プや4力国モードも加わって，さらにパ 
ヮーァッフ。した SUPER 大戦略がいま我 
我の前に姿を現した。さあ，熱い男の戦 
いがここから始まる。 





;大:麵爾 


XI turbo 用 57 D 版2枚組8,000円 

( ModellO は要 G - RAM ， 2ドライブ専用） 
システムソフト 0092(714)6236 


30 Oh ! X 1988.7. 


まずはメニューから — 

私が自分勝手に推しているシミュレーシ 
ヨン3本柱(注 1) のなかから，今回大戦略 
がパワーアップされて XI に発売されまし 
た。初代大戦略は現代大戦略という名前で 
3年前に98に発売されて以来，88, XI， F 
M , さらには MSX 2 に移植され(注2)，爆 
発的人気を得たソフトです。そのパワーは 
まさに親の遺言級でした（わかる人は古く 
からの読者ですねえ。わからない人はバッ 
クナンバーを見よう）。 

その後98には大戦略パワーアップセット 
や大戦略 II が， XI などにはマップコレク 
シヨン（注 3) が発売されました力す，大戦略 
II によって戦術が増えた98版と比べると， 

X 1版はただマップが増えただけで物足り 
ないところがずいぶんありました。そこで， 
今回発売された SUPER 大戦略ですが，で 
きるだけ大戦略 II の仕様に近づけたようで， 
ここまでよくやったなぁ，というのが素直 
な感想です。どこがどう変わったかは大戦 
略フアンの人なら興味津々ですね。それで 
は，ぼちぼち始めてみましょう力、 
「すいませ一ん， SUPER 大戦略ひとつく 
ださい」 

I 、ただきます — 

まずは，前作からの変更点をズラッと並 
ベていきますから，息切れしないでくださ 
いよ。ゲーム画面を見て最初に気づくのが， 
ビュースクリーンが大きくなったことです。 
これによって前作で捕らえに〈かった戦況 
が，ひと 目で確認できるようになりました。 
マ ップ サイズも 64 X 64( 前作は 40 X 40) とな 
り，前作よりかなり大きくなっています。 
それにつれて， ュニット 数も 48 個に増えた 
のですが，まだちょっと足りません。ホン 
卜は 60 個ぐらい作れるといいんだけどねえ。 

それと メッセージは すべて日本語に なっ 
て， とっても フレンドリ0それから，移動 
の方法もずいぶん変わりました。移動させ 
る ュニット上で F 1 を 押すところまでは前 
作と同じですが，ここから先がちょっと違 
います。 SUPER 大戦略では F 1 を押すと 
移動できる範囲が色違いで表示されるよう 
になったのです。おかげで自分でどこまで 
動けるか考える必要はなくなりました。プ 
レイヤーは 目的の移動場所に ヘックスカー 
ソルをもっていってスペースキーを 押し， 
リターン キーで 決定—移動，というように 
なりました。 

これについてはつまらなくなったという 
人も何人かいるようですが，やっぱりこの 


ほうが便利，初めて遊ぶ人でもすぐ理解で 
きそうです。 

お次は生産タイプ。これは SUPER 大戦 
略になってから新しく設けられました。こ 
のことは，あとで詳しく話しましよう。ほ 
かにも，4力国までプレイできる，画面全 
部を使う派手な戦闘シーン，要塞，湿地， 
橋の3つの地形が新たに追加，収録マップ 
数が25個になった（前作は16個)，生産でき 
る ユニットの 種類が121個（すごい数！）に 
なった，など SUPER の 名に恥じないもの 
になっています。このなかでひとつだけ悲 
しい変更点が， turbo 専用になってしまった 
こと。メモリ容量の関係 （ turbo になって増 
設された G - RAM にデータを置いている） 
でこうなってしまったんだろうけど，福岡 
のシステム ソフトさん，全国の XI ユーザ 
一はいつまでも侍ってますよ！ 

What 生産タイプ？ 

SUPER になって最大の変更点は，4力 
国で遊べることと，生産タイプの設定とい 
えます0 2力国でプレイするのと違って3, 
4力国ともなると，最初にどこから攻める 
のかを決めるのが重要になります。かとい 

注1いわずと知れた，三国志，信長の野望，大 
戦略のことである。 

注2 秋ごろにはファミコン版も発売されるらし 
い。それにしても四角いヘックスもやはりへッ 
クスと呼ぶのだろうか。 

注3 X 1(88 兼用），98,ともに限定発売された。 
ちなみに収録マップ数は X I が16個，98が45個 
だった。 



うわっ，敵がここまで来ちまった 




























って，攻めるのに梦中になっていると，よ 
その国が自分の首都を狙ってきます。 

てなわけで，前作よりも高度な戦術が要 
求されるのです。いい換えれば，前作は序 
章であって，これこそ真のストラテジッタ 
シミュレーション なのです（ストラテジッ 
クとは「戦略上重要な」という意味)。 

さて，お次は生産タイプ。これはなにか 
というと，前作のように生産できる兵器が 
決められているのではなく，プレイヤーは 
自面の兵器を12の生産タイプ(注4 ) のなか 
から選択することによって決めることがで 
きるのです。たとえば，中国なんかはメチ 
ャクチャ兵器は安いんだけど，性能が悪い 
し，逆に最新鋭部隊なんかは性能はいいけ 
ど価格が高い，というようにそれぞれに個 
性があります。ですから「俺は日本人だ， 
大和魂をなめるんじゃない！」という輩は 
日本を選べばいいし，「やっぱり戦争は兵 
器の豊富なアメリカだ！」という輩はアメ 
リカを選べばいいのです。こんな輩が SU 
PER 大戦略で戦うと，日本 vs アメリカ， 

第3次世界大戦が画面の上で繰り広げられ 
るのです0さらに， 3, 4力国でプレイす 
れば第3国の参戦もあって，ますます面白 
くなるでしよう。 

内蔵の12の生産タイプじゃ物足りない人 
は，生産タイプ編集でオリジナルの生産夕 
イプを作ることができます。ここでは121 
種類の ュニッ トのなかから，自分の気に入 
った20種類までを選ぶことができま,す。こ 
こには12の生産タイプのなかには入ってい 
ない「ゲリラ兵」がいます。こいつはたい 
して強くないのですが，価格が$100とお 
買い得で移動力も歩兵としては唯一4もあ 
るので，中立都市がたくさんあるマップで 
はその威力を発揮することでしよう。オリ 
ジナルの生産タイプを作るときは，ぜひ加 
えておきたい ュニッ トのひとつです。 

コンピュータの実力はし 、かに^"^ 

やはりこのテのゲームでいちばん気にな 
るのが，コンピュータの思考ルーチン。今 
回は私が実際にプレイした Red Bear を例 
にとってリポートしてみましよう。この Red 
Bear は北海道をあしらった3力国用のマッ 
プで，生産タイプは青がアメリカ1，赤が 
ソビエト，緑が西ドイツに設定され てい ま 
す。マップの中心に首都を持つ西ドイツが， 
北のソビエトと南西のアメリカに挟まれて 
難しそう。アメリカと西ドイツは首都が比 
較的近いのですが，ソビエトと西ドイツは 
ずいぶん離れています。私は，生産タイプ 
はこのままに，収入率100でアメリカ1を 



これが新しく加わった生産タイプ設定モード 



これでチェックメイト，私の勝ち 

選んでスタートしました。 


最初は基本どおり，歩兵と輸送のための 
ュニット を作ります。歩兵は少々高くても 
重歩兵を作ったほうがいいみたい 。 SUPER 
大戦略では，輸送手段として戦車も使える 
ので， M 2 ブラッドレーら作ってみました。 

最初はやっぱり中立都市の奪い合いです。 
20ターンくらいまでは，ソビエトの保有都 
市数が40近くあり，アメリカ，西ドイツは 
ともに20 くらいしかないヤバイ雰囲気でし 
た。ところが，24ターン目に私（アメリカ） 
が西ドイツの首都を占領したあたりから形 
勢逆転。都市数が互角（注 5) となればソビ 
エトに勝ったも同然です。なぜなら，アメ 
リカと西ドイツが激しく戦闘を繰り返し， 
アメリカが首都を占領する2，3ターン前 
になって，ソビエトの陸上部隊はやっと西 
ドイツの首都近くに迫って来たのです。 

このとき，アメリカの陸上および空中部 
隊の熟練度が D から C だったのに対し，ソ 
ビエトの 熟練度はほとんどな いに 等しかっ 
たのです。もう，ここからは押せ押せムード。 
ソビエトの 都市はみるみるアメリカに占領 
されて，結局は51ターン目で ソビエトの 首 
都を占領することができました。 

で，コンピュータの強さはどうかという 
と，確かに思考ルーチンは変わっています。 
前作にあったような，ガス欠の戦車の山は 
今回はできませんでした。でも「これはと‘ 
んでもなく強い」という感じではありませ 
ん（私が大戦略をやり込んだからかもしれ 
ないが)〇特に今回プレイした Red Bear の 
戦いでは，そんな印象を受けました。 



このあとガンガンバリバリと銃擊戦が始まる 



長かった戦いも勝利のうちに終了 


ごちそぅさま - ■ 

私は3力国モード初体験だったのですが, 
なんとか勝つことができました。中盤に， 
アパッチ（攻幣へリ）を量産したのが勝因だ 
と自分で分析しています。それにしても， 
敵国の兵器の特徴を覚えるのは大変です。 
だって初めて見る兵器がほとんどなんです 
から。参考までに書きますと，51ターン終 
わるのに18時間くらいかかりました。試験 
前にはやはりこのソフトは封印しておきま 
しよう。いまは ， Fukuoka City ( 4力国） 

をプレイしていますが，こちらはまだ5夕 
ーンくらいしかやってません。ところで， 
ェンデイングで ESC を押すと，ダラフイッ 
ク登場の仕方が毎回変わります （20 種類く 
らいあるのかな）。くだらないけど，やって 
みてください。 

それじゃぁ，みんな，ここまで読んでま 
だ買っていない人は8,000円持ってバソコ 
ンショップにかけ込もう（大きな店なら1 
割引きかな）。 えっ， ソーサリアンにイース II 
も買いたいって？う一ん，こまったちゃ 
んですねぇ。お金の余っている人は全部買 
えばいいけど，そうでない人には，ながぁ 
一〈遊べる SUPER 大戦略を勧めちゃった 
りするわけなのです。 

注4 アメリカ I ,アメリカ2,フランス，ソビ 
エト，イスラエル，スウェーデン，ワルシャワ， 

日本，西ドイツ，中国，イギリス，最新銳部隊 
の12種類。 

注5 首都を占領すると，その国の保有していた 
都市はすべて自分のものとなるのだ。 
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•麻雀狂時代 SPECIAL 
籲今夜も朝まで POWERFUL まあじゃん 
籲まじゃべんちゃ一•ねぎ麻雀 



おとこ度胸の 
麻雀3本勝負 

Ogikubo Kei 

荻窪圭 


巷ではいま，ギヤラクシーフオースが流 
行っているらしい。しかし， X 1/ X 68000 
には麻雀ゲームブームが突如として再燃 
したのだ。いまなぜ麻雀ゲームなのか。 
その謎に迫るべく，荻窪圭が果敢にも単 
身麻雀3本勝負に挑む。 


麻雀狂時代 SPECIAL 
X 6 B 000 用 5 W 2 HD 版2枚組7,800円 

Xl / Xlturbo 用 53□版2枚組6.800円 
マイクロネツト 0011 (561)1370 

今夜も朝まで POWERFUL まあじやん 
Xlturbo 用 5 M 2 D 版2枚組6,800円 
デービーソフト 0011(251)7462 

まじやべんちや一•ねぎ麻雀 
X】/XI turbo 用 5"2□版2枚組 6. 800円 
徳間コミュニケーシヨンズ 003(591)9161 


もう季節は梅雨です。好きだといったら 
電光石火の早業で後ろ指をさされる梅雨で 
す。しかし，誰からも嫌われてかわいそう 
なこの梅雨は，これから暑い夏になると忙 
しくなって体力もお金も必要だろうから6 
月くらいはゆっくりと休みなさい，という 
お天道様のお慈悲なのです。せっかくのご 
配慮なのだから全天候型コートでテニスだ 
と 力*， 室内プールで泳ぐと 力、， ディスコで 
汗を流してナンパだと 力、 東京ドームを借 
り切って野球をするだとか，梅雨の明けた 
沖縄へ行って焼くなどの健康的行事は言語 
道断この罰当たりめ，なのです。 

この梅雨時は，4人集まれば雀荘に出か 
けて全自動卓，大きなゲームセンターのあ 
るところなら並んでファイナルラップもい 
いでしよう。3人なら，少々梅雨にしては 
健康的に過ぎますが，流行の波も過ぎてゆ 
っくり遊べるビリヤードです。できればギ 
ャンブル性の強い9ボール 0 2人なら，8 
ボールや4つ玉もあります。外へ出かける 
のも億劫だったりしたらスーパーレイドッ 
クやツインビーで楽しめるでしよう。 

たったひとりでさみしいとき，雨で街に 
出るのも面倒なときはアートアンサンブル 
•オブ•シカゴを聴きながら，いがらしみ 
きおを読むもよし，トーキング•へッズの 
新譜を聴きながら坂口安吾のエッセイを読 
むもいいのですが，閑人の頭はやはり麻雀 
へと回帰してくるのです。 

なぜか麻雀ソフト應活 した— 

パソコンれい 明期， 「コンピュータ-^ 高速 
計算—思考ゲーム」という三段論法が夢だ 
ったころ，強い麻雀の思考 ルーチンを 開発 
しようと大学の大型 コンピュータで，でか 
い プロ グラムを走らせていた 人々 の思いも 
乗せて，麻雀ゲームが乱立した時代があり 
ました。 それに 輪をかけたのが ジャンピュ 
ータの 登場。 そのの ち， パソコンでは ハド 
ソンの「雀狂」，シヤノアールの「プロフエ 
ッシヨナ ル 麻雀」 以来これといった ゲーム 
のない低迷期が始まりました。麻雀自体が 
廃れたのか……。 

否，否，否。 確かにい まの学生はひところ 
ほど麻雀をしなくなって，学生街の雀荘は 
閑散としている と 聞きます。しかし，本屋 
の軒先には何册もの麻雀劇画雑誌が並んで 
いますし，相も変わらず ゲーセンの 片隅で 
はとめどなく新作麻雀 ゲー ムが入るありさ 
まで，飽きられて廃れていく気配は微塵も 
ありません0ただ， パソコンゲームと して 
の 麻雀に，ほかの ジャンルの ソフトほど新 
しいものを取り込んで成長していく力と魅 


力と度胸がなかったから。 

そこに登場したのが，力>の「ぎゆわんぶ 
らあ自己中心派」です。麻雀ソフトといえ 
ば思考ルーチンの強化と高速化をまず考え 
るのが普通であった時代に，娯楽性を追求 
したソフトを見事に完成させた， ゲーム ア 
ーツはさすがです。ぎゆわん自己の成功に 
よって，にわかに麻雀ソフトが活気づいて 
きました。そうしてここに，麻雀ソフトは 
娯楽派と本格派に分断されたので^ f 。 

今回遊んだ3本はすべて娯楽派の代表作。 
X 68000 用の「麻雀狂時代 SPECIAL」， XI 
turbo 専用の「今夜も朝まで POWERFUL 
まあじやん」， XI シリーズ1ドライブでも 
OK の「まじゃべんちゃ一.ねぎ麻雀」。いず 
れもかる〜いナンパな麻雀です。 

昔から，飲む•打つ•買うと申しまして， 
飲むは酒，打つは博打，買うは女なんです 
力す，本能的快楽3要素があります。これら 
に頼らないと楽しめないというのは困った 
日本人ですが，なかなか男の本能的な部分 
を突いていて一概に否定できないところが 
つらいところです。 

麻雀はいうまでもなく “打つ”のギャン 
ブル。ギャンブルの醍醐味は人事を尽くし 
て天命を待つ緊張感にあります。麻雀〈ら 
い複雑なゲームになってきますと，どこま 
でが人事で，どこまでが天命か判断できな 
くなり「ええいっ！ままよ」と目をつぶ 
って勝ったり，完璧な集中力と読みを持っ 
てしても負けたり（もちろん最終的には後 
者のほうが強いはずだ）と奥深い勝負の世 
界が繰り広げられるのです。 

しかし，それは相手が生の人間の場合。 
コンピュータ相手ですと，お金も人間関係 
もなにも関係ないので，つい適当に打った 
り，コンピュータ側の3人が速く打つので 
それにつられて捨て牌をまったく読まなく 
なったり，運だけに頼ったりと投げやりな 
麻雀に手を染めてしまいます。おかげで麻 
雀の腕がかえって落ちてしまう百害あって 
一利なし。そこで，いかにューザーに「負 
けてたまるか」心を起こさせるかがポイン 
卜となってきました。シューテイングや R 
PG などほかのジャンルで培われたアメとム 
チ，プレイヤーを先へ先へといざなうノウ 
ハウが必要となってきたのです。 

では，ということで ゲーセン 麻雀 ゲーム 
のポイントである“女の裸”とストーリー 
性を持ち出したのです。麻雀劇画に女はつ 
きものですからね （3 要素のうちの“買う” 
ですな ) 。勝ち続けないと女の子の裸が見え 
ないという，ある意味ではたいへん卑怯な 
手を使ってユーザーに緊張感を強いること 
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となったのです。たかがデッサンの狂った 
女の裸なぞ……，と思う人もありましょう。 
そこは哀しい男の性，なのですね。 

では，麻雀ゲーム3本立てをどうぞ。 

とりあえず， 始めてみる ■ ■ 

まずは「麻雀狂時代 SPECIAL 」。 今回遊 
んだのは X 68000 用だが， Xlturbo 用はかな 
り前に出ていたりする（と，いきなり文体 
が変わってしまった。気持ち悪いやつ)。違 
うところは操作性と絵と速さくらいのもの 
で，ほとんど一緒だね。いきなり江戸時代 
風の絵とビバルディの四季より“春”には 
笑ったけど。 

Xlturbo 版と同様に2人対戦トーナメン 
トモードと4人卓囲みモードの2 部構成。 
秀逸なのはさすが X 68000 という牌の質感で 
あって，これは4人卓囲みモードでより発 
揮される。従来の4人モード麻雀 ゲームの 
ように上から4人横に牌を並べている（そ 
ういえばぎゆわん自己もそうだね）んでは 
ない，きちんと四角〈囲んでいるのだから 
思わず画面を上に向けて遊ばにゃあ，と思 
う次第だ。 

対して，2人対戦モードでは例によって 
対面式の勝負の世界。麻雀劇画でありがち 
な，主人公と敵役がバトルを繰り広げてい 
る間，残りの2人がただの座敷童，あるい 
は「異能ただおる j (知っている人，います 
か？〉と化してしまい哀れをさそうといっ 
た悲劇はないのである。でも，実際に2人 
で麻雀をすると，牌を積むのがたいへん難 
しいんだよね。 

普通の4人モードもいいが，今回は徹底 
的に娯楽性を高めるための付加価値を追求 
すべく 2人で対戦した。2人対戦だとトー 
ナメントモード，好きな相手を選べない。 
「ぼ,ぼく，あの女の子がいい…… j とのた 
まっても「ふっふふ。君は世間をなめてい 
る」と，あしらわれるのがオチだよん。 

続いて Xlturbo では 「今夜 も朝まで P 0 
WERFUL まあじゃん」が起動する。あの 
スーパー 春望とう っ でい ぽこの デービー ソ 



テンパってたのに残念でした 



フトである。こちらは麻雀狂時代 SPECIA 
L なんて目ではないモードの多さ，お好き 
な麻雀で遊んでくだせえと，よりどりみど 
りつかみ取りである。 メニューに 並ぶはノ 
ーマル麻雀，エキサイト麻雀，さすらい麻 
雀，ぽこ麻雀の4種類。ノーマル麻雀なん 
てこのさいどうでもいいとして，選ぶはひ 
たすら女の子を脱がせることが生き甲斐の 
エキサイト麻雀か，日本を南から北まで旅 
をして歩〈さすらい麻雀か。こちらも相手 
を選べないさすらい麻雀を選んだ。さすら 
い麻雀では女の子の裸が出てこないのがさ 
みしい，なんてことはいわない。私は聖人 
君子，正義と真実の荻窪圭である。 

Xlturbo がガーガー いっている 間，その 
隣の Xltwin では「まじ や べんち や 一.ねぎ 
麻雀」である。これはもうテクノポリスソフ 
卜であるからして，あなたの予想どおり， 
女の子がいないわけがない。どうやらスト 
—リーには関係ないところで勝手に女の子 
が脱いで いって くれるらしいが，女の子が 
どうなろうと関係なくゲームが進むところ 
が 「へっへ。 見たいのなら見せてやるが本 
当の敵はそこにはいないんだぜ」的なアイ 
ロニー が あってい かにもテクポリらしい。 

流行なのか，突然 XI が「マジヤベンチヤ 
一，ネギマージヤン」と喋ったのもテクポ 
リらしい。スタート時に主人公のタマネギ 
(だと思う）が友だちの家へ遊びに行くのだ 
が，その絵をラインとペイントで描くとこ 


ろがいかにも初期 AVG のパロディしていて 
テクポリらしい（ほかの絵はちゃんと描い 
ているよ)。1ドライブで遊んだので入れ換 
えがめんどくさいのもテクポリらしい（ん 
なことはないか)。いきなり出てきた女の子 
が年端もいかぬしっぽの生えたガキである 
ところもテクポリらしい。こんな絵を「か 
あいい」という身内の（で）氏はどうやら 
オタクらしい。まったく困ったものだ。私 
にはただ不気味なだけである。 

おっと， X 68000 では第1回戦の対戦相手, 
女子大生で18歳で趣味がオーディシヨン荒 
らしの中森桃子が退屈してマイク片手に踊 
っている。待ちなさい。すぐ相手してあげ 
るから。う一ん。 XI シリーズのグラフィツ 
クのあとだとさすがにキ レイ だ0とりあえ 
ず，軽く “くいたんドラ3” の満貫でも狙 
うか。マウスは楽だ。鳴けるときはぺこっ 
とウィンドウが開いて，いらないときはキ 
ヤンセルして，ポコっと牌を捨てて，キー 
ボードのように行き過ぎて隣の牌を切って 
しまったとか操作を忘れて（私の記憶力は 
ワン ボード マイコン 並みなのだ）リーチの 
度に マニュアルを 開かなくともいい。 

それにしても，ずいぶんゲーセン版とは 
違うなあ。ゲーセン版は女の子3人だけだ 
ったしなあ。まあ，ゲーセンの麻雀もいま 
や麻雀狂時代なんて時代遅れの锖びた店に 
しかないし。いまは麻雀学園の時代だもん。 

とりあえず，くいたんドラ3で ロン。 お 
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いおい， パ、スタオルを巻いた桃子ちやん。 
そんだけしか見せてくれないの？ ちよっ 
とずっこい（ちなみに，ずるいっていう意 
味ね）よ。このモードだと2回上がれば終 
わっちゃうから，次は役満でも上がんない 
と全部見えないじゃない。ずっこいよなあ。 
ええい！結局2回目も跳ね満どまりでは 
ないか。覚えていろよ。 

気分転換に第2会場のさすらい麻雀へと 
移動。まず名前やら性別やら血液型やら年 
齢やら入れる。でも，性別“1”血液型“す” 
なんて入れても怒らないからいい加減なも 
のだ。名前は最近気に入っている“ぬめば” 
とした。 

モノクロの，こいつ， 俺を笑わせようと 
してるな！！的のオープニングでいきなり 
沖縄の変態オタクと対戦。 3万円持って行 
って，まず場所代3,000円だ。こんなやつ 
さっさと片を つける ぞ，と。操作が全部 テ 
ンキーでできるのが嬉しいね。 

さて，これはタンヤオ狙いにいくか，三 
色も付きそうだ……なんだ？考えても無 
駄だと。うるさい！しかもオタク独特の 
癖をよ〈掴んだ丁寧語で攻めてくるではな 
いか。この野郎。俺のマニア嫌いを知って 
の狼籍か。許せん！！天に代わって成敗し 
てくれる。えいや！ メンタンピンドラ1 
リーチ！ 

ふっふ……ん？な•に5千点リーチだあ？ 
なんだそれは。マニュアルを見る0おお， 


5千点棒でリーチをかけるとウーハン（五 
翻）にもなるのか。ずっこいやつ。次から 
は.それでいこう。1万点リーチだと十翻だ 
から，ほかに五翻あれば数え役満ではない 
か0なんて恐ろしい地方ルール だ。 こうな 
りや容赦はしないぜ。 • 上がって上がって上 
がりまくってやる。それ，1万点リーチに 
ドラ2のみ だ。 タンピン1万点リーチ だ。 

と，勝ち続けたはいいがいつまでたって 
も終わらない。相手はマイナス10万点だ。 
そろそろ普通ならギブアップだ。マニュア 
ルを読んでみる0 

げげ っ。 こっちがギブアップ （SHIFT + 
BREAK ) するか，半荘終了までやらされる 
のか。南4局まで8回も，しかも親のとき 
に連荘なんかすると永遠に，相手側が上が 
るまで局が進まない。そんなのなしだあ。ひ 
どいひどいひどい。ほら，敵のオタクが1万 
点リーチで上がってしまった。勝ち続ける 
より，相手には安〈上がらせてこちらはで 
っかく上がるほうがむずいんだぞ。俺は怒 
った。こんなゲーム見捨てて第3会場のね 
ぎ麻雀だ。 

ねぎ麻雀ではいきなり，「がんばって」 と 
の声に送られて NAO KUN との対戦だ。こ 
いつもテンキーとスペースキーの みで 操作 
可能だ。対戦相手の顔は見えないが，その 
代わり画面の3分の1ほどの面積を，よう 
わからん変な女の子 （ロリコン 雑誌やコミ 
ケで売つているいかがわしい同人誌に出て 


きそうなタイプ）が占めている。畜生。俺 
がこの手の絵が大嫌いなのを知っていて描 
いたな。許さない。しかも相手は時折「サ 
ンダーストーム」などとわけのわからん言 
葉を発する。まあ，3回闘って持ち点の多 
いほうが勝ちという短期決戦だから許そう。 
ひとり目はあっさりかわした。次はタンヤ 
才のたっちゃんだ。その前に，第1会場の 
X 68000 では2回戦の相手， M . 力卜一がキ 
セルを吸って暇を潰している。相手をして 
やるか。 

M . カトーが引き連れているのはゲーセン 
版でもお馴染みのでかいグラスに入った謎 
の美女だ。高い手で上がるとちっちゃい忍 
者のできそ こ ないみたいなヤツが ストロー 
で半分くらい ジュースを 飲んでくれるので 
サービス がよい。でも， ジュース （だよね）が 
減って直接見えてしまうよ り，ジュースに 
隠れたシルエツトのほうが ヒ ワイだという 
意見もある。 

さっさと謎の美女のヌードを拝んで，再 
びさすらい麻雀に挑戦だ。 

さて，第2会場。じっと我慢の子に徹し， 
なんとか長崎へと行くことができたが，「こ 
のやろてめ〜，かんがえてね一できれった 
ら j などといじめられて，体力と精神力は 
すでにリポビタン D でも復活できぬほどに 
疲労した。ここは BGM でも変えてみよう。 
今夜も朝まで〜麻雀（長い名前は嫌い）で 
はなんと静寂を含めて6曲まで BGM を選 
べるのだ。歌謡曲，演歌，クラシック調か 
ら ロック， ディスコまで。私は精神統一の 
ため，静寂を選ぶ。が，長崎でぽろりと負 
けてしまった。なんて疲れる ゲーム だ。次 
は女の子と対戦するェキサイト麻雀で頭を 
休めようっと。 

さて，第3会場のねぎ麻雀である。こち 
らも2回戦は楽勝。勢いにまかせて林くん 
と対戦だ。ここで勝つと第2部へと行ける。 
慎重に慎重に……あれ，なんだ こいつ。 少 
牌してやんの。ひえ 一。 麻雀ソフトで少牌 
なんてどうやったらできるんだ一。なんて 
画期的なソフトだあ。おいらぶったまげつ 



ちよつと 上がったくらいでいやなやつ 
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たの仏陀。う一ん。変なやつ。 

第1会場では3回戦の a •ポックだ s な 
んと趣味はスター•ウォーズをけなすこと。 
うんうん，けなしていいよ，僕も手伝って 
あげる0でもスター • トレックもけなすか 
らね。ふっふ。引き連れるご婦人はボック 
の妻で夫と同様耳がとんがっていたりする 
力す，顔が奇麗なら耳が尖っていようが長か 
わうが3つあろうが，細かいことは気にし 
ない。それが男だ。 

リポ□パワー炸裂! ■■ 

この恐怖の麻雀ソフト3本立て同時上映 
も，栄養ドリンクパワーでなんとか乗り切 
った。畜生，ナチュラルドラッグ以外には 
手を出さないと誓ったのに。 

結果。第1会場では見事優勝し，画像取 
り込みの洋風の部屋のべッドの上でけだる 
そうにしている美少女を拝むことができた。 
やはり B 級ゲームは面白い，というより普 
通の B 級ゲームを面白くしてしま 5 X 68000 
は凄いのだ。 

第2会場では気を取り直し，エキサイト 
麻雀で楽しんだ。17歳の橋本奈緒美嬢より， 
21歳の高橋香織女史のほうが女狐してて面 
白かったね。許せないのはみんな気力 5 '短い 
こと。やれ「かんがえないで」だの「はや 
くすてれば」だのせかすものだから，つい 
問違えて捨てちゃって困ってしまってわん 
わんわわん，になってしまった。香綿 i ちゃ 
んは「か」，奈緒美ちゃんは「は」という感 
じでダイイングメッセージを残してくれた 
んだけどあれはなんだったんだろう。結構 
幽1だったりする。全員に勝ってみないとわ 
かんないだろうなあ。きっと，メッセージ 
をつなげた名前でプレーするといいことで 
もあるのだろう。 

実をいうとおまけで付いてきた，うっで 
いぽこのキャラクターが総出演する，ぽこ 
麻雀がいちばん気楽で簡単で楽しかったり 
するんだな，これが。もう少しぽこ麻雀に 
力を入れてもよかった気がする。 

第3会場のねぎ麻雀は困ったことに第2 
部からイカサマができるのだ。上がると点 
に応じてパワーが貰えるんだけど，そのパ 
ワーを使って積み込みやらラストチ ヤンス 
やらがある。役満積み込みで役満 テン パイ 
(聰牌)だったりするんだけど，たくさんパ 
ワーを使う割にはそのあとのツモが悪くて 
敵さんに上がられると腹が立って健康によ 
くないんた'よね。だいたい， コン ピュ ー タ 
がイカサマをすると怒る癖に自分はやりた 
いという，人間心理の襞を突いたいやらし 
さがあるね。テクポリにも困ったもんだ。 



きっと，ねぎ麻雀は相手もイカサマやって 
るぞ。 

では，ついでだから，一部の読者が気に 
しているだろう女の子の評価でもしておこ 
うか0 

まず，麻雀狂時代 SPECIAL はさすがに 
X 68000 だけあって奇麗だしバラ エティに 富 
んでいるんだけれど，若いロリロリした娘 
がいないのでその方面が好みの方はあまり 
好かないだろうね。僕はたまにデッサンが 
狂っていても（そういえばこの手の女の子 
はたいてい人間業ではないプロポーション 
をしているもんだ)，幽霊がヌードになった 
り宇宙人の美女がシャワーを浴びてたりす 
るほうが楽しいけど。それにしても，幽霊 
のヌードが見られるという発想は，とって 
も人知を越えている。 

今夜も朝まで POWERFUL まあじゃんの 
女の子は，今回の3本のなかではいちばん 
まとまっているね。7人いて16歳から23歳 
までさまざまだし。捨て台詞を吐きながら 
脱いだりして。これだけいれば，まあひと 
りくらいはポイントの高い子が誰にとって 
も存在するでしようね。 

ひどいのがねぎ麻雀ね。みんな胸なんて 
ないくせにブラジャーは付けてるし，足は 
サリーちゃんだし。こんなのがいいという 
人の気がしれない。思わず画面の左上に（絵 
の出るところ）紙でも貼って見えないよう 
にして遊ばないと，いろいろな意味で痛々 


しくてつらいものがある。こういった絵の 
好きな人，ごめんね。 

ぐったりした私 ■ 

さすがに麻雀ソフトばかり一気にやると 
疲れる。おかげで友だちと雀荘へ行ったら 
何年か振りで大負けしてしまった。麻雀ゲ 
ームはやりすぎると，なんにもしないより 
実戦の勘が# E っていけないね。ほどほどに 
しましょラ Q 

今度は，「雀豪1」や「悟空」みたいな本 
格的な渋い麻雀ソフトをしたい（結局，懲 
りていない)。雀豪1は賢くて，プレイ記録 
がデイスタにいつまでも残るので面白そう 
(個人ごとのデータの持ち込みができるよう 
になればもっといい )0 誰はタンヤオが多く 
て，誰はトイトイが多いなんて癖がわかっ 
ていい。早く X 68000 版でも出ないかなあ。 
う一ん〇 



3番目のコマンドはいったいなんぢやこりや 
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よりよいソフトウェア環境のために 

(最終回) 


理想の環境が 
意味するもの 

Tama VutaKa 

多摩豊 

環境にはすべてが含まれる。もちろん我 
我ユーザーも。環境は常に進化する〇そ 
れを理想の方向へと導くのはユーザー自 
身である0そうして，やがてコンピュー 
夕が目に見えない存在になったとき，我 
我が考えるべき問題も一歩進んだものに 
なるだろう。 



いよいよ最終回である。そこで今回はこ 
の1年間に書いてきたことをまとめる意味 
も含めて，僕の理想とする環境，いってみ 
れば サイェンスファ ンタ ジーの 世界を お 届 
けすることにしよう。 

すべての初めに -I II 

理想の環境すべてを支配する鍵，それは 
“子供”である。 

環境については，まず対象となる人間を 
考えなければいけない。そして僕が理想と 
する環境は，すべての人がその利益を享受 
できるものなのである。“すべての人”とい 
った場合，もちろん技術者やビジネスマン 
が大きな割合を占めることは事実であるが， 
忘れてはならないのが“子供”の存在であ 
る。 

現代社会において，もっとも多くの情報 
処理の必要に迫られているのは若い世代， 
とくに子供である。成長するのが仕事の子 
供たちは，1日の大半を情報処理に費やし 
ている。我々が大人面をできるのも，子供 
のころからさまざまなことを学んできた成 
果なのである。 

世の中がより高度情報化社会へと変貌し， 
世間に出るまでに覚えなければならないこ 
とが増えていくのであれば，こういった“過 
酷な試練”に立ち向かわなければならない 
子供たちこそ，もっとも情報処理機械が必 
要だといえるのではないだろうか？ それ 
ゆえ，これから書いていく理想の環境は，常 
に“子供”を念頭において考えなければな 
らないのである。 

八_ドウェア的な問題 ■ 丨■■丨■丨 I 

理想の環境に必要なハードウェアを想定 
するなら，それは結局のところ“ダイナブ 
ツク”に行き着くことになる。 

ノートの大きさでコンピュータの機能を 
すべて持ち合わせているもの。ダイナブツ 
クのハードウェア的な要素をひと言で表す 
とこういうことになる。ラツフ。トツフ。コン 
ピュータはこれに非常に近い存在であり， 
ハードウェア的な部分だけをとってみると， 
もうこれの完成は目前ということができる。 
しかし理想の環境を追うからには，当然の 
ことながらこれに満足するわけにはいかない。 

理想とするハードウヱアは，軽くなけれ 
ばいけない。つまり，小学生でも手軽に持 
ち運べる程度で，当然のことながら厚みも 
できる限り薄くなければいけないのである。 

現状のラツプトツプコンピュータの中で， 
重量や厚みを軽減する際の問題点は，バツ 
テリ，デイスプレイ，ディスクドライブの 


3要素である。これらのうち現在の技術で 
利用できるものは 1 C カードによる外部記憶 
装置の標準化程度であろう。これの採用に 

より， ハードディスク や フロッピーデイス 
クドライブの厚みや重さは軽減できる。 

さて，問題となるのはディスプレイであ 
る。もともとコンピュータ自身は思ったほ 
ど電力を消費するものではない。電卓など 
は水銀電池でも駆動するのであるから，極 
言すれば，コンピュータを乾電池で動かし 
たっていいだろう（もちろん，現状では実 
用にならないが)。 

ところがディスプレイがつくと話は全然 
違って〈る。子供が持ち運べることを目標 
とする ハードウェアに， CRT デ、 イスフ。 レイ 
をつけることを考える人はいないだろうが， 
現在のところ液晶 カラー デイスプレイでも 
かなり重いし，なんといっても電力を食う。 
結局，軽量薄型低消費電力の カラー デ イス 
プレイの登場が，すべてを可能にする鍵な 
のかもしれない。もちろんこれに代わるな 
んらかの方法があるかもしれないが。 

続いて周辺機器の問題も考えてみよう。 

まず入出力関係はデイスプレイとスピー 
力，キーボードとトラックボールと 1 C カー 
ドリーダにモデムあたりが必要最低限とい 
うことになるであろう。この中でちょっと 
奇異に思えるかもしれないのがトラックボ 
ールである0現状ではマウスが全盛である 
が，あれは操作するのに一定の平面を必要 
とする。持ち運びができるということは， 
またどんな状況でも使えるものでなければ 
ならないということでもある。ところが， 
電車や車の中など平面が確保できない場所 
では，ポインティングデバイス（要するに 
カーソルを移動させる機器）としてマウス 
を使うのは難しくなる。よってそれに代わ 
る装置としては，ジョイスティックとライ 
トペンとトラックボールなどが考えられる0 
どれにもそれなりの長所短所はあるが，ま 
ったくの独断からここではトラックボール 
を採用することにしたい。 

また，プリンタはやはり外部機器とする 
ほうが現実的であろう。夢物語として超小 
型軽量低消費電力高速レーザープリンタの 
出現を想定してもいいが，どちらにしろ今 
回の話からはわき道にそれるのでとりあえ 
ず置いておくことにしよう。 

操作の基本となるシステム 11 ■■ 

いわゆる 0 S は重要な要素である。この連 
載の初回にも書いたことだが，コンピュー 
夕の操作法は 0 S とマンマシンインタフェ 
イスの両面から考えていかなければならな 
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い。この環境の対象は“子供”であるから， 
WYSWYG(What You See is What You 

Get ) の思想に基づき，いわゆるコマンド入 
力などが必要ないインタフェイスと，机に 
ノートや教^ f 書をしまうのと同じレベルで 
把握できる OS 概念が必要となるのであろ 
ラ。 

ダイナブック本体を机にたとえるとする 
I , さまざまな情報を管理する 1 C カードは 
ルーズリーフバインダにあたる。そして個 
個の情報（コンピュータ用語でいうところ 
のファイル）が，このバインダの中の紙に 
なるわけである。ちなみにこのたとえでい 
うと，ソフトウヱァは情報を使う公式であ 
り，また鉛筆や定規などの道具でもあるわ 
けで，ソフトを入れておくものはさしずめ 
筆箱か鉋ということになるわけである。そ 
ういった観点からすると，データ保存用の 
カードとソフト供給用のカード，この2種 
類に対してそれぞれ別のカードリーダが必 
要になるのかもしれない。 

こうした概念を図式化して，それに基づ 
く操作法を確立すれば，子供でも使えるも 
のとなるはずである。そして，その操作方 
法はすべて一貫していなければならず，た 
とえばソフトウェアが異なると使い方が変 
わるというようなことがあってはならない。 
使っている者にとっては，自分が OS レべ 
ルにいるの かソフトの 中にいるの かなどと 
いうことすら認識できなくてもよいわけで 
ある。 

データの鵰 — . 

次に データについて 考えよう。 

情報の交換（これはノートの貸し借りに 
たとえることができる）は単純にカードの 
交換でなされなければならない。これが実 
現するためには，どこのハードウェァを使 
ってい ようと，まず 力 ードの フォ ー マット 
は同じものである必要がある。 

次にデータ自身のフォーマットだ力す，「ど 
ういったソフトを使っても基本的に同じフ 
ォー マットでデータを保存す る」 などとい 
う方法論をとるのは誤りであろう。基本的 
なデータ（文字，画像，音声など）に関し 
て，それぞれ基本フォーマットは定めてお 
く必要があるが，ソフトごとにこのデータ 
を操作する方法は異なっていてもよいと思 
われる。要は基本フォーマットに変換する 
ことができ，基本フォーマットから変換す 
る ことができる機能を，すべてのソフトが 
備えていればいいわけである。この操作方 
法が十分に簡単であれば，子供でもこれを 
利用することはできる（「基本の形に戻す」 


という概念は，積み 
木を箱から取り出し， 

それをさまざまな形 
に作り上げ，それを 
また元の箱にしまう 
というような例によ 
って，子供にでも容 
易に理解できるであ 
ろぅ) 。 

たとえばここにソ 
フト A で作ったファ 
イルがある。このフ 
ァイルをソフト B で 
直接読むことはでき 
ないが，ソフト A は 
ファイルを基本フォーマットに変換でき， 
ソフト B は基本フオーマットのファイルを 
自分で使えるフォーマットに変換すること 
ができる0よってソフト A のファイルはソ 
フト B でも使えるわけだ（ちょっとばかり 
面倒臭いが)。 

大事なのはこの基本フォーマットが優れ 
たフォーマットで，どんなソフトを開発す 
るときでも，必ずこれとの相互変換が可能 
な環境が作られることである。これさえ確 
保されれば，結局のところデータは常に互 
換性を保持することになろう。実際問題 
としては，このデータ変換をより容易にす 
るようなソフトが出現することは間違いな 
いが。 

ソフトウェア^" 

この環境に刘•してソフトウェアはどうあ 
るべきか？まず，基本的に提供されるべ 
きソフトウェアは，ハードウェアと一体化 
しているべきであろう。 

ワープロ，スプレッド シート， データべ 
—ス，グラフィック，サウンド，通信〇こ 
の 6 種類に関しては ROM ベースで存在し 
ていなければならない。それぞれのソフト 
ウェァは非常に頻繁に使われるものであり， 
またあまりさまざまな種類があっては使う 
側に混乱をきたす恐れがあるからである。 

こういったソフトウェアは，その使い方 
が子供にでも理解できる程度に（たとえば 
スプレッドシートなどは小遣い帳なみに） 
簡単であれば，即座に世間に受け入れられ， 
利用されるだろう。反面，その程度ではよ 
り高度な利用には機能不足となるかもしれ 
ない。そこでカードベースで供給されるソ 
フトウヱァが登場するわけである。ただし 
これも， ROM ベースで供給されているソ 
フトの機能を強化するようなものとなるの 
である。 


たとえばスプレッドシートを強化する定 
形表ソフト，ワープロを強化する辞書ソフ 
卜や文形ソフト，グラフィックソフトを強 
化するツールソフトなどだ。これらが元の 
ソフトの機能を強化することにより，ュー 
ザーは新しいソフトウェアと格闘すること 
なしに，より高機能で用途にあったものを 
即座に手に入れることができるようになる 
のである（さらに，これですベての要求に 
応えることができれば，データの互換とい 
う問題も考慮する必要がなくなる)。 

よりよい環境とは？ ■ 

こういった環境の実現は，社会に大きな 
変動をもたらすかもしれない。たとえば通 
信も大きく変わり，ファクシミリや郵便の 
代わりに直接データ転送するようになるで 
あろう。大型コンピュータとの接続もより 
容易となり，大規模ネットワークサービス 
が新しいマスメディアとして開花する。そ 
してダイナブック抜きにしては，生活自体 
が成り立たないという状況も訪れるかもし 
れない。 

これは情報化社会の理想像の一端である。 
決して現在のパソコン環境を取り巻くハー 
ドウェア，ソフトウェアの非互換，とどま 
るところを知らない高速化，多機能化の嵐， 
そしてより専門的で複雑となってい〈操作 
性などを推し進めた結果として得られるも 
のではない。 

よりよいソフトウヱア環境を追い求める 
厳しい批判の目，それが存在して初めてソ 
フトウェアの変革がなされ，ハードウェア 
の進イ匕も可育 g となる。そしてこれこそが， 
次なる理想的な環境を生み出してい〈ため 
の鍵なのである。 

.パーソナルコンピュータ。 それはいまだ 
に“環境”と呼べるような状況を作り出し 
てはいない。 
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第 17 回知能機械概論 お茶目な計算機たち 


生ぬる t 沿 RO / V なら L 、らない/ 


/ 僕を 8 R 0 N 協議会にまぜて / 

Oh ! X 6 月号を見ていると， 8 R 0 N 計画な 
る壮大なプロジェクトの話が載っていまし 
た。まったく喜ばしい限りです。こういうア 
—キテクチヤの話は汗をかいたあとのビー 
ルぐらい好きなので，今回は予定していた 
テーマを急遽変更してこのことに関してい 
ろいろ書きます。 8 R 0 N 計画を陰ながら応 
援していこうと思っているのです。 

ですから，6月号を見ながら読んでくだ 
さいね。最初に，祝氏がなぜ8ビットか？ 
ということについて書いています。 8ビッ 
トプロセッサという言葉の定義は，プロセ 
ッサ内の演算ユニット部で扱うデータの幅 
が何ビットであるかということですから， 
単純に考えれば，このビット数が大きけれ 
ば大きいほど1回に扱えるデータ量が大き 
くなるので，スピードが速〈なるわけです。 
でもあえて8ビットとこだわる気持ちは次 
のようなものでしよラ。 

1) 16ビット，32ビットとなるにつれてい 
ろいろ機能が豊富になってきてしまい，本 
来のせっかくのプロセッサの機能から目が 
そらされがちになる。 

2) とにかく安いので気楽にプロセッサを 
買い込んでそれを使って好きなシステムを 
組めるし，コーヒーをその上にひっかけて 
しまってもすぐに立ち直ることができる。 

祝氏がデイスクの問題に言及している部 
図1ダイナミック計算機 



ダイナミック計算機ではプログラムに 
応じて命令セツトが変イ匕する 


分は，一見話が飛んでいるようにみえます 
力％これがなかなか渋いところをついてい 
るといえます。プロセッサの世界はなんと 
なく華やかなので目がいきがちですし，実 
際に研究の世界でも花形のほうに入ると思 
います力 ? ，実際のマシンの性能を落として 
いるのは，そのような一見地味で泥臭い部 
分である場合が案外多いのです。そういう 
わけで，このへんのことを®々しく思って 
いた自分としては，まったくそのとおりと 
いいたいところです。 

最後の村田氏の「たこあし君」は，現実的 
のようで非現実的で，でもやっぱり現実的 
で面白いものです。今ではもうプロセッサは 
中心に偉そうに座っている指揮者という考 
えでは対応できないような場面がよくある 
のです。つまりちょっといいメモリや周辺 
機器などをつなごうとするとプロセッサよ 
りずっと高くなったりするのです。やっぱ 
り計算機の中でも，ものの値段というのは 
大きな影響があるわけでして，今ではもう 
プロセッサもメモリや配線やバスなどのよ 
うなシステム資源のひとつとして平等に扱 
うような態度を持たなくてはならないよう 
です。 

さて，いよいよ中森氏の 「 V 8」 チップ提 
言の迫力ある記事です。 8個の特徴が書い 
てありますが，比較的当たり前のことと，と 
んでもないことが並べてあるところが特に 
素晴しいところです。究極の8ビットとい 
いながら， 「 Z 80 完全互換」というのもちょ 
っとみみっちくて可愛らしく思われます。 

1) の豊富なレジスタセット， 2) の命令の 
対称^ t , 3) のメモリマッピングは，まあ一- 
般的ですね。 5) に書かれている物理アドレ 
スを全部内蔵キャッシュに入れてヒット率 
100%にするというのはキャッシュの定義か 
らいくとまるで変態です力す，まあそんなも 
んでしょう。 

7) の自己書き換えサポートというのは思 
想的に好きでないとしかいいようがありま 
せん。百害あって一利か二利しかないよう 
な気がします。これについてはそれだけで 


す。 

残された4)，6)， 8) はたいへん好きなと 
ころなので，ウリウリといきましよう。僕 
自身が考える究極構想の中でときぉり関連 
させていくことにします。 

ところで，十算機のアーキテクチャという 
ものは，フォン•ノイマン型の計算機が発 
明されて以来，多くの人がいろいろ研究に 
専念しているものの，実際に開発され，使 
われている計算機は，初期の計算機に比べ 
て実はなぜかたいした進歩も遂げていない 
といえると思います。そのことは，現在日 
本でガンガンやろうとしている TRON 計画 
でも，そのアーキテクチャはフオン•ノイ 
マン型であるということをみても叫らかで 
しよラ0 

わずかに仮想記憶，パイプライン制御， 
キャッシュ，そして RISC というのが小さ 
な変革（というより技術的進歩）といえま 
しよラ。 

いろいろ浮わついた計算機も考えられま 
すから，本当はそちらのほうが面白いと思 
うのですが， 8 RON 計画では，せっかく 8ビ 
ットを見直そうということなので，従来の 
技術や流れをジャンプ台としてできるだけ 
ぶっ飛んだアーキテクチャをいろいろ提案 
したいと思います。 

/ 究極のダイナ5ツク計算機/ 

中森氏の提案 4) の，ベンチマーク命令を 
用意し，ベンチマークテストプログラムを 
1命令でやってしまうというのは強烈な風 
刺も効いた痛快な提案です。一方， 8) で述 
ベられている，命令をューザーが勝手に付 
け加えられるというのは比較的昔からある 
マイクロプログラマ ブル プロセッサの考え 
方だと思います。最近のプロセッサは命令 
自体を直接ハードウェアで実現せずに，そ 
の下のレベルのマイクロプログラムをプロ 
セッサ内に持って実現する方式が主流です。 
マイクロプログラマ ブル プロセッサでは外 
付けの ROM に好きなマイクロプログラム 
を書いて自由に命令セツトを設定できると 
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いうものでした。 

I ころで 4) と 8) をいっしよに考えてひ!： 
ひねりすると生まれるのがダイナミック計 
算機なのです。このマシンは，実行するプ 
ログラムを解析して，命令のシーケンスを 
調べ，最適になるように命令セットをマシ 
ン自身がダイナミックに決定するというも 
のです。 

それぞれの命令は，ミクロにみると計算 
機の中のいろいろな回路のゲートを開いた 
り，信号を作ったりしているのですが，命 
令と命令の間には独立した処理，つまり同 
時に実行できる部分が多数存在します。そ 
ういうふうにして命令をいろいろ融合する 
と，そのプログラムの実行にいちばん効率 
的な命令セットというものが実現するとい 
うわけなのです。 

独立して実行できる2つの命令はひとつ 
の命令にしてしまい並列に実行するという 
だけでも，性能的にはかなりよくなるでし 
よラ〇 

プログラムの解析•も，時間のかけ方によ 
っていろいろな深さが考えられます。究極 
的には 4) のように，プログラムを1個の命 
令だけで実行してしまうでしよう。しかし 
中森氏も指摘しているように， MIPS 値 (1 
秒間に実行できる命令数）がとんでもない 
値になってしまうのは，仕方のないことと 
いえます。 

/ 究極の RISC / 

Sun ワークステーションの最新シリーズ 
が RISC 型のオリジナルプロセッサを採用 
し，しかも高い MIPS 値を実現したという 
ことは ， RISC vs . CISC 論争のひとつの決 
着を示しているといえるでしよう。 

もちろん，製品レベルに至るまでにひと 
ことで RISC といってもその定義の範囲は 
だんだんと広がっていきました。その意味 
では RISC vs . CISC 論争で CISC 側に立っ 
ていた人たちにとっては，この論争自体す 
でに意味のないものとなっていると思われ 
ます（もともと CISC というのも RISC 派が 


付けた言葉ですが)。 

Reduced Instruction Set Computer と 
いう名のとぉり，次々と複雑な命令が付け 
加えられていくことが結局は損になるのだ 
ということがそもそもの発想であり，その 
ために命令セットを縮小する，つまり命令 
数をとにかく少なくしたもの力 ? ，忠実な R 
ISC といえるでしよう。 

究極の RISC は命令数がいくつになるの 
でしようか？ 厳密に考えるとハードウェ 
ァに直接関係するところから始まり，計算 
機の定義というところにまでいくかもしれ 
ません力す，よく使われる命令は 

1) データの移動 

2) データの演算 

3) 制御の移動 

4) 入出力命令 

ですから，一応そこだけを考えればよいで 
しょぅ。 

結論からいえば命令はひとつになるので 
す。要するに条件付きデータ移動命令だけで 
よいのです。それでは上に挙げた4つのうち 
の1番めしか実現されないように思われる 
かもしれませんが，まず 3) の制御の移動（ジ 
ヤンプや コールな ど）は PC (プログラムカ 
ウンタ）へのデータの格納と同じですから 
含まれますし， 4) の入出力命令に関しては 
I / O 関係はメモリマップドとすればメモリ 
への読み書きと等価になります。 

2) に関してはややうさんくさいと思われ 
るかもしれません力' これはアドレッシン 
グに含ませてしまうのです。従来のマイク 
ロプロセッサでも，アドレスレジスタを使 
つてアドレツシングを行うときにアドレス 
レジスタ間の加算は当然のことでした。で 
すからアドレスレジスタとデータレジスタ 
の区別をなくして，アドレッシングの考え 
を拡張して演算も含ませるのは，一概に不 
自然とはいえないでしよう。 

しかもその命令は前の演算の結果に基づ 
くフラグが立っているときのみ行うので， 
種々の条件付き命令にも対応することがで 
きます。 



究極の RISC ではアドレツシングの持つ 
意味が重要になっておりそのために命令数 
を1個にすることができました。ところで 
命令数が1個ということは命令を構成する 
オペコードとオペランドのフイールドで才 
ペコードはひとつであるということを意味 
します。ということはオペコード部をデコ 
ード（解読)する必要はなくなります。要す 
るにオペコード部は不要なのです。したが 
って命令数はゼロともいえます。命令数が 
ゼロの計算機，これでも計算機なのです。 

/無限大 MIPS 値をもつ夢の計算機/ 

最近のコンパイラは定数の計算，たとえ 
ば， 

x = 10*45 — 27 ; 

などという計算があるとコンパイルの時点 
でこれを 
x = 423; 

というコードに変えてしまうということは 
当たり前のようです。さらに 
x = factor (100) ; 

などというように，引数が定数である関数 
はあらかじめ計算してしまい， x に単にそ 
の結果の定数を代入するコードを出すとい 
うコンパイラも常識的になってきているそ 
うです。 

これを初めて知ったときはなぜかムショ 
ウに「反則っ！」という気持ちがしたもの 
でした。でも今ではなんとも思わなくなっ 
てきました。 

というわけで提案するのが， MIPS 値が 
無限大という夢の計算機です。賢明な読者 
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の皆さんはもうおわかりでしよう，やれる 
ことはすベてやってしまうというコンパイ 
ラを付けるのです。そうすれば僕の家の中 
に大切に保存してある（捨てられている） 
元祖 MZ -80 K でさえ夢の計算機となるので 
す。 

もちろんキーボードや ファイル などから 
データを入力するプログラムのように，解 
がひとつでないプログラムの場合は計算す 
る部分はかなり残ってしまうでしようが， 
そうでない場合には実行時間は厳密にゼロ 
なのです。 

実はここのところの話は今やっている研 
究の出発点ともいえる話なのですが，でも 
たぶん読者の多くの方は，「反則っ！」と 
思われているでしようね。僕も同感です。 

L 究極の高級言語マシン J 

計算機に関する多くの問題は，計算機の 
ハードウエアと プログラム の意味的な隔た 
り，つまり セマンティックギャップ にある 
とマィャーズはその有名な著書（参考文献 

図2パイプラインにおける打ち消し命令の例 


2) です旨摘しました。そのセマンティックギ 
ヤップを埋めるための直接的なアプローチ 
が高級言語マシンのアプローチです。高級 
言語というのは BASIC ， PASCAL，C (こ 
れはそうでもないのだが，ここらへんの議 
論は次回でやるつもり）などのプロダラミ 
ング言語や中間言語などであり，要するに 
アセンブリ言語よりはレベルが高いという 
ことをいっているのです。そして高級言語 
マシンはそのような言語を直接アーキテク 
チヤでサポートしようというマシンです。 

そのようなマシンでも究極といえそうな 
のが，直接実行型高級言語マシンと呼ばれ 
るものです。これは，普通のプロセッサが 
命令をひとつ取ってくるような感 1 じで，た 
とえば“ if ” 文の“ i ” の文字をメモリから取 
ってきて処理を行っていくというたまげた 
マシンです。さすがに提案した Chu 氏らは 
まだ試作にまでは至っていないようですが， 
日本では数年前に筑波大学のグループが汎 
用言語型の試作機を完成させました。 

残念ながら，速度的にはあまり期侍でき 


結果 

① 害き込み 


実行 


オペランドオペコード 
フェッチ フェッチ 


D 卜 


_ _ — __ 

時間 、 B( C ( D ( E C ； 

③ 

(C ( D ( E ( 1 ~〇 

④,_ _ _,____ 

C D T E ( E ( D ( J 

(E I ( D £ J 〇 


プログラム 
A Move 
B Compare 
C if (flag) jump to label 
D Move 
E Move 
F i 

G i _ 

Label : H ( = E) 

I (=D) 

J Move 


この図は 4 段のパイブライン計算機を示している。時間②において， C を実行すると初めて条 
件ジャンプをすることがわかるが，ジャンプ先にジャンプしないとしてパイプラインに入れてし 
まった D と E を打ち消す命令， "5 と互が入れてあるので，パイプラインを無効にする処理が必要 
ではなくなる。 


ないと思います。なぜならば直接実行型マ 
シンでは翻訳あるいは変換といったコンパ 
イル的処理までを実行時にハードウエアに 
やらせているからだと僕は思っています。 

このタイプのマシンは趣味ですので，そ 
のうちオリジナルマシンのアーキテクチャ 
を紹介できるでしよう。 

L 究極のバイプライン計算機 j 

ある仕事をパイプライン的に行えばその 
パイプラインの段数倍の速度が実現される， 
ということはもちろんプロセッサにも当て 
はまります。その場合，条件ジャンプのよ 
うな命令があるとパイプラインが崩れるの 
がいやなので，条件が成り立つかどうかを 
予測したいのです。そこで，中森氏の 6) に 
書かれている完全分岐予測機能力す欲しくな 
るわけです。別に 中 森氏の ユーモアに 水を 
差すつもりはないのですが，これはまあキ 
ーボード入力によって処理を決めるような 
場合など，わざわざ例を出すまでもなく不 
可能なことです。 

実行中においてこのような条件ジャンプ 
が何度も出てくるのはループの部分です。 
つまりある条件が成り立てば次の命令にそ 
のまま移動してループを抜け出るが，そう 
でないときはループの先頭にジャンプする 
ことを繰り返す，などという処理を行うと 
きです。 

でも，パイプラインに読み込んでいくの 
はいつも先頭にジャンプするほうの命令列 
とする，というシンプルな方式が案外うま 
くいくのです。つまり，ループを抜け出ると 
きの1回だけは失敗しますが，あとは全部 
うまくいくわけですからね。そういうわけ 
で，後方に条件ジャンプするときはそっち 
にいくと見なしてパイプラインに入れてし 
まうとすれば，なんとかうまくいくと僕は 
思っています。それ以上がんばって推測し 
たとしても，労力の割にたぶん数％速度が 
上がるといった程度の話ですから。 

ところで究極のパイプライン計算機では 
ほんとうに100%パイプラインを崩すこと 
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はないのです。かなり発想の転換を必要と 
Li すが，命令すべてにその操作の逆操作 
の命令を対応づけておきます。そして，分 
岐の起こるところではどちらか一方が起こ 
るとして命令をパイプライン的に実行して 
いき，もしそちらが成り立たなかった場合 
でも，あわてて読み込んだ部分をはき出し 
て別の命令列の実行に移ったりせず，余分 
に実行してしまうような部分を打ち消すと 
いう命令列を実行するようにグログラムを 
作っておけばよいわけです。図1にこのよ 
うすを示します。 

この方式は， VLIW 計算機という參考文 
献 3) に紹介されているマシンの中で使われ 
ているメカニズムに準じたものです力 5 '，か 
なり面白いと思います。 VLIW 計算機自体 
は ALU (演算ュニット）を多数もたせた面 
白いアーキテクチャをもった計算機ですの 
で，そちらも参考にしてください。 

/_ 究極のウルトラコンパチ計算機/ 

仮想メモリ，ダイナミックなメモリセッ 
卜などから始まり，仮想 0 S ， 上位コンパチ， 
PC - 9801 / IBM - PC 対応パソコン，仮想マシ 
ンなど.など，一枚皮を被せてフレキシブル 
にしようとするアプローチはいろいろなレ 
ベルで見られます0 

しかし残念なことにそのように仮想的に 
すればするほどス ピー ド性能は落ちてしま 
うのです。32ビットだからこそ16ビットの 
エミュレート をしても実用になるという こ 
とです。 

一方，ューザーの 心理は 自分のマシンが 
X 68000 に もなり ， UNIX マシンに もなり， 
たまには PC -98 にもなるも のが ほしいとい 
うことでしよう 。 Apple GS のように巧妙 
に2つのマシンのアーキテクチャをバスレ 
ベルで 結合した例もあります が， ややもす 
ると，別々に買ったほうがかえって安い，速 
度的にも機能的にも性能が落ちる，といっ 
たことになってしまうのです。そこでプラ 
イドを捨ててきれいでイ ンテリアに もなる 
ような箱を作るのです。さすがにただいろ 


いろな製品を その 中に 
突っ込めるようにする 
というのでは芸がない 
ので，入出力だけは最 
高のものを用意してお 
きます。そうして種々 
のパソコンの 入出力部 
分だけをうまくエレガ 
ントに取り換えて，こ 
のウルトラコンノヽ。チ 言 t 

算機で統一的に扱える 
ようにすればよいので 
す。 

入出力規格の統一的 
な扱いが成功した日にはもうどんな計算機 
が出現しても怖くありません。それを買っ 
てきてこの マシンに 入れて画面や スピーカ 
や キーボー ドやマウスやデイスタのところ 
をアダプタにつけてもっと素敵なこの マシ 
ンのものに接続すればよいのです。 

さらに通信機能をリッチにすれば，遠く 
にある スーパーコ ン ピュー タもひとつのウ 
インドウとして，ファミコンで ゲームを し 
ているウインドウの隣に開いて，ちょっと 
気象予測などをさせてみる，なんてことも 
できます。なかなか粋ですね。これこそ， 
究極の仮想マシン•ウル トラコ ンパチ計算 
機の真骨頂といえましょう。ちょっと場所 
をとるので押入れシエイプタイプをバリエ 
ーシヨンとして用意したほうがいいかもし 
れません。 

L 夢のマシンち夢でな<なる / 

今回は 8 RON 計画に触発されて，急遽僕 
が考える究極的で，かつ比較的現実的な（そ 
うともいえないか？）計算機を挙げてみま 
したが，命令セットを自分で決めて CPU を 
自分で作るということは，そんなにベらぼ 
うなことではないのです。基本はデジタル 
回路ですし，頭で考えたことをそのまま回 
路で表現すれば，なんとか動くだけは動く 
という マシンは できると 思います。 もちろ 
んここでは VLSI 化ということをいってい 


るのではありません。 

いちばん簡単な CPU (数ビットというお 
もちや）ならば， TTL シリーズとメモリと 
クロック発生器ぐらいでできてしまいます。 
また Z 80 程度の機能を実現するのでも，ビ 
ットスライスの ALU とシーケンサを使って 
やれば，特にハード屋さんでなくても（僕 
、もハード屋さんではないのですが)，それほ 
ど苦労しないでできてしまうのではないで 
しょうか0 

というわけで， 8 RON 協議会ではこのよ 
うなチャレンジ精神のある方の出現を望ん 
でいますので，「こんなもん作った」など 
のレポートを侍っています，などと私は8 
RON 協議会の名を勝手にかたってしまいま 
す。 

もちろんこの連載に関する意見や感想な 
どを寄せてくださることも陰ながら待って 
いるのですけど。来月は「ソフトウェア物 
理学」なる話をします，たぶん。 
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市販ソフ^ 

期待度測定 



Katsumoto Snin 

勝本信 


利*学技術計算用のダラフ作成支援ソフト 
が少ない。理工系の人々の多くは，プロ 
グラムは自分で書くものと思っており，市 
販ソフトの使用を潔しとしない傾向がある 
ようだ。このため，彼らの多くが使用する 
最小二乗法によるデータ解析や GP - IB の機 
器制御，グラフ作成等に関するプログラム 
で市販されているものは数えるほどしかな 
い。しかし，最近は表集計ソフトの多くが 
統合化によりグラフ作成をサポートしてい 
るので，うまく利用するとデータ解析から 
グラフ作成までを一貫して手早く行うこと 
ができる。今回は，表集計ソフトの標準的 
存在となりつつある Lotusl -2-3 を取り上げ， 
科学技術計算用のグラフ作成を考えてみる。 

科学技術計算用のグラフ 

測定したデータを点としてプロットし， 
その上へ，理論から予想できる曲線を当て 
はめるというのが科学技術の分野で通常用 
いられるグラフである。たとえば，電流- 
電圧特性の測定では，素子に流れる電流を 
いろいろ変えて，どれだけ電圧がかかるか 
を測る。そうして得た電流，電圧の値をそ 
れぞれ X 軸， Y 軸にプロットする。素子が単 
純な抵抗の場合，データ点はオームの法則 
から定められる直線の近くに並ぶことが予 
想される。抵抗の値 R はできるだけ多くの 
点の近くを通るように引いた直線の傾きか 
ら求められる。直線の傾きを正確に決める 
には最小二乗法を使えばよい。データ点の 
ばらつきは測定の正確さの指標になる。電 
流の多いところで直線から外れる傾向があ 
れば，たとえば発熱などで抵抗の値が変化 
しているのではないかと予想される。 

いくつかの素子について同じように電流 
-電圧特性を測定し，ひとつのグラフに書き 
込むことも多い。この場合，素子それぞれ 
を表すシンボルを変えてプロットする。測 
定の誤差も重要である。電圧計の表示が何 
桁か，最小桁の表示がふらついていない力％ 
接続リード線の抵抗や接触抵抗はどの程度 
か，などを考慮して誤差が何％かを見積も 
り，プロットしたデータ点の上下に誤差の 
大きさを表す棒(エラーバー）を書く。 

抵抗の電流-電圧特性や，パネの伸びと重 
りの重さのように，データ点が直線的に並 
ぶ場合は簡単だが，理想気体の体積 P と圧 
力 V の関係のように反比例するときはダラ 
フは曲線になり，本当に反比例しているの 
かどうかわかりにくい0そこで Y 軸に V を， 


X 軸には P の逆数をプロットしてやると， 
データ点はきれいに直線上に並ぶので反比 
例からのずれなどを詳しく調べることがで 
きる。このように，測定データをそのまま 
プロットするのではなく，関数（この場合 
は逆数という関数）をとってプロットする 
ことが多ぃ。 

要求される条件 

事務用ダラフソフトを科学技術計算で使 
う場合はどのような点に問題があるのかを， 
以下にチェックしてみよう。まず，グラフ 
形式の種類であるが，棒グラフ，円グラフ， 
帯グラフなどは使用できない。 

実のところ，実際に使用できるグラフの 
形式は XY という1種類しかない。これは 
父と Y の値をそのまま横軸と縦軸にプロッ 
卜するという単純な方式であり，散布図と 
も呼ばれている。もともと2つの現象の間 
に相関関係があるかどうかを調べるための 
ものだ。たとえば人間の身長を X ，体重を 
Y として適当な集団についてプロットして 
みれば，身長と体重の間に関係があるかど 
うかを調べられる。ここで我々に必要なの 
は X 軸の値も指定できるということである。 
これ以外の形式では， X 軸は多くの場合自 
動的に等間隔にとられてしまうので使用で 
きなぃ。 

たとえば電流-電圧特性の測定の場合，電 
流の値が完全に等間隔である場合のみ ，X 
Y 以外のグラフ形式もなん!：か使用できる。 
しかし実際の測定では完全に等間隔という 
ことはまずないだろうから，実質的に XY 
以外のグラフ形式は使えない。その場合 X 
Y 形式をサポートしていないグラフソフト 
は致命的だ。たとえば，チャート up など力 ？ 
それで，いくら ユーザー インタフェイスが 
素晴し〈とも，肝心な機能が不足している 
のではなんにもならない。 

データの値そのままではなく，関数をと 
った値をプロットする機能が必要であると 
述べたが，その関数としては逆数，二乗， 
対数，指数などはもちろんのこと，ユーザ 
一が定義した関数を使用できることが望ま 
しい。というより不可欠であるといったほ 
うが正しいだろう。関数をいろいろ変えて 
データ点が直線に並ぶ関数を探す，という 
作業が，未知データを解析するときにまず 
行うことだからだ。 

データの取り込みからグラフ作成までを 
手早く行えることも必要だ。測定を行いな 
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分も，データが少したまった段階でグラフ 
にしてみるということがしばしばある。そ 
んなとき，いちいち別のソフトを立ち上げ 
るなどということはできれば'避けたい。こ 
の点で Multiplan + MS - Chart の組み合わせ 
は残念なことに使いに〈いものになってし 
まっている。 

Lotusl-2-3 をチェックする 

使えるグラフ形式は上で述べたように x 
Y のみであるが， マニュアル や解説書を見 
ても2つの現象の相関を調べるためのもの 
だとだけ書かれてぉり， X 軸の値を等間隔 
でなく自由に取れるという重要な点には触 
れられていない。せめてひと言でも書いて 
ぉいてほしかった。 

データフアイルは テキス トファイルであ 
る限り，どんなものでも読み込めるといっ 
てよいだろう。データの区切りも コンマ や 
スぺースなど適当でよい。一太郎で打ち込 
んだデータでも， アスキーセーブ された B 
ASIC プログラムの DATA 文でも テキスト 
ファイルならなんでも読み込んでしまう0 
その他， SYLK 形式はもちろんのこと ， d 
BASE - II / III のデータファイルや K 3 形式 
なども付属の変換ューティリティ経由で読 
み込むことができる。 

最小二乗法を使ってデータに直線を当て 
はめるコマンドを内蔵しているところなど 
は，さすが表集計ソフトと言えるのである 
が，パラメータの誤差の計算は直線の傾き 
のみであり，切片の誤差は求められない。 
しかし，なにしろ表集計ソフトであるから 
自分で式を打ち込んで計算させればよい。 
このあたりはグラフ作成専用ソフトにはな 
い強みであろう。 

関数プロットのやり方についてだが，適 
当な関数をとって，データ点が直線上に並 
ぶようにプロットすると見やすくなること 
は既に述べた。実例を示すため，データを 
X と Y の組合せとしよう。まず， XtY が 
反比例の場合は横軸に X ，縦軸に 1/ Y をプ 
ロットすればよい。データ Y が B 行に1列 
から縦に入っているとすると， C 行1列に， 
1/ B 1 と入力してそれを下方にコピーすれば 
よい。 Lotus が自動的に式を 1/ B 2，1/ B 3, 
1/ B 4 ……と変換してくれる。 

データ Y が X の指数関数になっている場 
合は対数をとってプロットする。いまの1/ 
B 1 の代わりに @ L 0 G ( B 1) と入力すればよい。 
ここで対数関数 LOG の前に@をつけたのは- 


単に Lotus 卜 2-3 での規則に過ぎない。では 
Y が X の n 乗になっていたらどうするか。こ 
の場合は X と Y の両方の対数をとってプロ 
ットする。もともとの関係が Y = AX n であ 
るから，両辺の対数をとれば， LOG(Y) = 
LOG(A)+rrLOG(X) となる。こうすれば 
LOG(Y) と LOG (X) が比例関係にあるのは 
明らかだろう。この場合 n の値を知らなく 
とも，対数をとってプロットするだけで直 
線の傾きから n がわかる。 

もっと複雑な例を挙げてみよう。 X の 1 
乗と 3 乗の組合せ Y = AX + BX 3 では，両辺 
を X で割れば Y/X = A + BX 2 となるので， 
Y/X と X 2 をプロットする0 ローレンツ曲線 
と呼ばれる Y = A/(X 2 + B 2 ) の関係では， 
1/Y と X 2 でよい。正規分布を表すガウス曲 
線 Y = EXP ( — X 2 /A 2 ) では，対数をとって 
みればすぐわかるように， LOG(Y) と X 2 
でプロットすればよい。データ点が直線の 
近くにきれいに並ぶはずである。ここで挙 
げた例は，いずれも関数をとればデータ点 
の並びを直線に変換できるというものであ 
るが，さらに複雑なもの，たとえば Y = A 
(1-e 一 x/c ) などは A の個:を知らないと変換 
できないため，最小二乗法で前もって A を 
求めておく必要がある。それから LOG (A 
— Y ) と XtT フ。ロットするので、ある。 

最小二乗法で求めた曲線を描く方法を説 
明しよう。曲線上のいくつかの点の座標を 
入力すればよいのであるが，もちろん実際 
には横軸の値を適当な間隔で入力し，縦軸 
の値は式を入力して，言 t 算は Lotus に行わ 
せる。測定データ点が多いときはデータ点 
と曲線とで横軸の値を共通に選んで構わな 
い力 ? ，データ点が少ないと，曲線が折れ線 
になってしまう。曲線表示用の点を十分な 
量だけとって，測定データ点とソートして 
おけばよい„ 

問題点 

グラフの下書き用にはほぼ満足のいく L 
otusl-2-3 である力す，清書用にはまだまだと 
いう感じであり，相変わらずロットリング 
とインスタントレタリングが活躍している。 
清書用に使う場合の問題点をいくつか述べ 
てみると，まず目盛りが枠の外側方向に出 
ており内側に向けられない，目盛りを打つ 
間隔が等間隔のみでありユーザーによる指 
定が行えない，などいくらでもある。デー 
夕の値の絶対値が千を越えると，必ず「単 
位•千」というキャプションがついてしま 


Tt of 1H in Polvstyrerw in 888322 
20200^.6THz senpl^-clMn 0.69 K echo 

268- 
240- 
220- 
200- 
180- 
160- 
140- 
120- 
100- 
80- 
60- 
40- 


repeet interval <Bec) 
口 T1= 3.72 »c 


T1of 1H In Polvet^reod in 3Ho 860322 
2020(^8.emz 98r«>l9-cl06n 0.69 K echo 


-0.5- 


-2.5- 


^ i * i _ i * i » i i 

0 2 4 6 8 t0 

rop«et interval <9ec) 

□ Tt = 3.72 »o 

一定値 U に段々近づいていく関数 1(0 = l 0 *( l - e - (, - lo,/T ) 
に従うデータをそのままプロットしたグラフ（上）と ， t 
と LOG ( I 。一 l ( t )) とでプロットし，最小二乗法で求めた1。， 
t , T の値を使って直線を当てはめたグラフ 

うのもはなはだ迷惑な話だ。その他キャプ 
ションに上付き•下付き文字を使用できな 
い，データ 点の表示に エラーバーを つけら 
れないなどの弱点がある。 

しかし，なによりも清書用に使えない原 
因というのは，縦軸のキャプションが縦書 
きになることだ。日本語を使うときはまっ 
たく問題ないのであるが，英数文字の縦書 
き，こればっかりはいただけない。もとも 
との IBM-PC 版ではきちんと90度回転した 
文字を表示しているのに。 AX マシンの 登場 
に伴い， IBM - PC/AT 用ソフトの日本語対 
応化が続々となされて行くことを考えると 
不安でならない。 

理工系ユーザー向けのソフト 

ひと昔前は，表集計やデータベースのソフ 
卜などはプログラミングを知らない人が使 
うものだという偏見があった。実際，市販 
ソフトもその程度のものが多かった。しか 
し実用的なワープロソフトが数多く登場し 
たことにより，そんな時代は過ぎ去ったと 
言えよう。エディタアセンブラから始まっ 
たソフトウェアの統合化は，ワープロと図 
形処理，表集計とグラフ作成を結びっけて 
きた。メモリ限界は 0 S の進化により突破さ 
れようとしている。 C 言語を内蔵したヮー 
プロの登場も間近いのではないか。 
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特別_親 

X BAS to C の正しい使い方 . 村田敏幸83 

C でアセンブリ言語の勉強を . 中森章87 


Appendix 

C 言語簡易リファレンス- 


編集室95 


雷吾からの誘惑 


多くのプログラマが最も魅力を感じるプログラミング言語，それが C 言 
語です。 C 言語は， UNIX 記述用言語として PDP-11 というミニコン上 
で開発されたものであり，その生い立ちから UNIX と切り離して考える 
ことはできません。しかし， C 言語は UNIX の世界に留まらず，況用コ 
ンピュータのシステム記述用として，そしてパーソナルコンピュータの 
アプリケーション開発においても高い生産性を発揮しています。最近で 
はバソコン雑誌で C 言語に関する特集が組まれることも珍しくはなく， 
入門書も数多く出揃ってきています。 

そんななかで OhlX では初めて C 言語の特集をお贈りすることになりま 
した。もちろん， OhIX でやるからには真っ正面からプログラミング言 
語としての C を捉えてみたいと 着え ています0ここで注意してほしいの 
は，私たちは決して「これからは C の時代だ」と，大上段に構えたり， 
「皆さんも C でブログラムを始め ましよ ラ」とそそのかすつも0ではない 
ということです。 C 言語はいかにも 話題のプログラミング言語ですが， 
誰にでも手軽に入門できる言語と いうわけではありません。それでも， 
C 言語について学ぶことはコンピュータへの理解を深めるろえで意義深 
いことでしよう。単に使用法や書式を知るのではなぐ C 言語の思想を正 
しく理解することが大切です。言葉が文化を創るよろに，コンピュータ 
言語はシステム環境を創るからです。 


|| c のおかれた状況は？ 


パソコンのプロダラミング言語として望 
ましいものは？と考えたとき，果たして 
C 言語はどのような位置にあるだろう 。 C 
言語がバソコン雑誌などで騒がれるように 
なって 5 年以上になるが，確かに 16 ビット 
以上の機種では， C が主力開発言語として 
確固たる地位を築いているようではある。 
しかし， これはソフトハウスや 一部の マニ 
アックな ユーザーの レベルの 話であって， 
一般の 98ユーザー などが C を使っていると 
いうことではもちろんない（そもそも彼ら 
の多くはプログラミングなどしない）。 

BASIC は，その名のとおり初心者を主な 
対象とした言語だから，プロの開発者が BA 
SIC から C に移行したからといって，それは 
開発者のレベルの向上でしかない。少なく 
L もパソコンの標準言語として，今後 C が 
BASIC にとって代わるということではない 
はずだ。 

ところ力 ? ，アセンブラとの関係で見た場 
合，この先 C がアセンブラに代わる役割を 
担っていくことはかなり予想できるだろう。 
XI や MZ などの8ビットマシンではどうし 
たってアセンブラのほうが最終的に有利で 
あったが，十分なメモリ，正しい最適化と 
いった条件が揃えば，アセンブラにできて 


C にできないことはほとんどないように思 
われるからだ。 

||皆さん C はお使いですか7 

さて，そのような状況のなかで，ユーザ 
一は C に対してどのような見方をしている 
のだろう力、。ちよっと Oh!X の若手スタッフ 
に声をかけてみた。 

— C を使ったことがありますか？ 
►ないです，でも早く使いたいな一などと 
思っています。理由ですか？そりゃ高級 
言語がアセンブラの代わりになるなら楽だ 
からですよ。（で） 

►機会があれば使ってみたい。流行の言語 
だし，知っていて損はないと思う。 (H.K) 
►使ってますよ。だって UNIX 上じゃみんな 
C ですよ 。 (A.K) 

►少な〈とも私の周りには C のできる人は 
いません。私が知っているのは，美しい構 
造化もできるし，汚いスパゲティもできる 
ということ。（お） 

やはり Oh! X のスタッフでも，関心はあ 
るが未だに使ったことがないという人が多 
いのが現状のようだ。 

—C は BASIC に次ぐ主流言語になり得る 
t 思いますか？ 

►思いません0ハ。ソコン買っていきなり C 
なんて無理ですよ。（で> 


►16 ビット以上ならともかく， 8 ビットで 
はメモリやスピードの関係で無理があるの 
では？ ( S . K ) 

►流行は続〈でしようが，当然 ROM にのっ 
かることはないでしよう。それに C って難 
しいんでしよ？（お） 

►なり得ないと思う。一般民間人がお役所 
仕事を嫌うのを見てもわかるように，人間 
はあとに利益を得ることができるとわかっ 
ていても，その前の手続きを面倒に思うも 
のなのだ。（く） 

たいていの人が，これは無理という E 方 
をしているようだ。まずはひと安心という 
ところだろう力*。 

|| C 言語入門適性チ; T ック 

というわけで，なにしろ Oh ! X 始まって 
以来の C 言語特集である。読者諸君ですで 
に C を使っている人はさっさと各記事を読 
んでいただくとして，まだ C を使ったこと 
のない人は手始めに，ここで C 言語入門適 
性チェックを受けることをお勧めしたい。 

フローチャートの出題とコメントは，村 
田敏幸氏にお願いした。なかなか意地悪な 
検査になっているが，まあ気楽に読んで楽 
しんでいただきたい（当の村田氏にかな 
り思想的な偏りがあるようだが……，おお 
怖わつ ） 0 


44 Oh ! X 1988.7. 




















Yes 0 No i^> 


ダークサイドという言 
葉には惹かれるものが 
ある 

〇 

スピルバーグの映画は 
必ず見に行く 

〇 

キ_ボードよりもジョ 
イステイックに触れて 
いる時間のほうが長い 

〇 

赤川次郎を愛読してい 
る 

匚 


Oh ! X は自分の機種の記 
事しか読まない 

〇 

〇 


〇 


〇 


〇 





アルゴリズムを考える 
,のは面白い 

〇 

キーポードは人差し指 
を駆使して打つ 


ダンブリストを打ち込 
むのが得意 

0 

スター プログラマを目 
指している 

[ 


プログラムなんか組め 
なくてもかまわない 

0 


<} ◊— 0<7 つ _ _^ 


他人が 軎 いたプログラ 
ムを読んで勉強するよ 
うにしている 

〇 

マニュアルや文法害に 
はきちんと目を通す 

〇 

作ってみたいプログラ 
ムのアイデアがいっぱ 
いある 

〇 

BASIC は遅いから嫌いだ 


やっぱり時代の最先端 
を歩きたい 

〇 


〇 






■… < ~1 n 


ひ 











システム環境は自分で 
構築するものだ 

0 

デバッグに生き甲斐を 
感じる 


プログラミングの得意 
な友人がいる 


ビジュアルシェルのよ 
うなものがないと 0S と 
して失格だ 

〇 

コンパイラはインタプ 
リタよりもあらゆる点 
で優れている 

〇 

C 



门 1 - 


- r -1 n 


〇 


ひ 











普段はマシン語を使っ 
ている 

〇 

BASIC なら自分の思いど 
おりのプログラムを害 
くことができる 


マシン語を覚えようと 
して挫折したままだ 

0 

BASIC 上でもプログラム 
を暴走させたことがあ 
る 

0 

作りたいプログラムは 
なんといってもゲーム 

〇 



o _o 一 一 o _s_ # 


a _i c_ a 



は自分流に使うといコンユーザーとして 
の基本的な資質を持っ 1、 るといえるでしょう。 
はっきりいって C だろうが，アセンブラだろうが 
心配することはありません。というわけで，ここ 
らで一発 C してみますか？ 

8ビツトマシンのユーザーでしたら CP / M 上の 
安価なもの，ランゲージシリーズの C ( a C ) か 
SmaH - C あたりから始めるのが無難でしよう。これ 
らはあくまでサブセツトであり実用にはなりませ 
んが，雰囲気をつかむには十分です。 C で新しい 
プログラミングのスタイルを修得したらアセンブ 
ラとの両刀遣いでマシンの限界に挑戦するという 
のもよいでしよう。 


X 68000 ユーザー,であれば，迷わず XC を買いまし 
よう（どうしても CP / M 68 K が欲しいというのなら 
止めはしませんが）。 


そしてやるからには，どちらの人もバイブルで 
ある r プログラミング言語 Cj (共立出版）を用意 
してください。不安であればもう丨冊入門窨を買 
つてもかまいません。あとはその入門書とパイブ 


ルとマニュアルを読みながら，小さくても「完結 
した j プログラムをたくさん作っていけば，段々 
と C の作法にも惯れていくでしょう。地道な努力 
があなたにはいちばん効果的な方法でしょう。 



素質は ありそう 1 ^ か 夂 息い切って C に挑戦 
するのもよいでし ょ^ まともに取り組むの 
にはちょつと力不足の 1 うですね。 

もしも途中で挫折してしまったら，と不安を感 


じるようなら背伸びしてはいけません。あきらめ 
て身を引いてください。 BASIC さんとお幸せにね， 
というところかな。 


いやいや BASIC もいいもんですよ。エディタから 
何から揃っているし，実行中マズイ！ と思った 
らいつでも Break できるし，何よりいつでも手軽に 
使えるし，その気になればかなり複雑なことだっ 
てできるし。こんな素敵なプログラミング言語が 
使えるなんて，あなたは幸せな人です。い_な， 
い一な，うらやまし一な。 

……と，この文章を読んで，バカにされている 
ような気になった人にはまだチャンスはあります。 
今回の特集を徹底的に読みまくるなどして実力を 
磨き， C の世界へ奇襲攻擎をかけましょう。 



フフフ，なんに \ 考えてし 内いで しょ。ぁぶな 
いなあ，この タイプ^ 人 にかと勘違いに見舞 
われやすいんですよ c I 化されやすいというか， 
本に害いてあることを鵜飲みにして，自分でもよ 
くわかっていないのに「〜はちよっとねえ j とか話 
しちゃうタイプ。金田正一がパ•リーグの試合を解 
説しているかのような，的外れなことばかりいう。 
なんだって？ 自分はそうじゃない？ う一ん， 
重傷だ。 

もっとも，このタイプの人の中にはとんでもな 
い天才がいるというケースもあったりするもんだ 
から，ちよっと困ってしまうのだ力<。 

まあ，ただの勘違い男だろうが，本当の天才だ 
ろうが，ノリの軽さこそがこのタイプの本質だか 
ら，ごじゃごじゃ考えずに C でも D でもやってみ 
るのがいいかもしれない。勘違いというのはそれ 
はそれで幸せなことだし，もしも天才であったら， 
本当に一発当てられるかもしれないから。ね。 



れば C で窨かれて い!^^ ^ SIC で害かれていよう 
がおかまいなし。喜んわせていただきます。 


というのがこのタイプ „ プログラミングとは無緣 
の生活を送っているのでしょう。かといって本当 
は自分でもプログラミングできればい一な，と思 
っているのではありませんか？ ただ，あと I 歩 
が踏み出せないだけなのですよね。いろいろな本 
を読むだけ i 売んでわかったつもりになり，いつで 
もできると思って放ったらかしにしてしまうのか 
もしれませんね。それとも「こりゃ自分には無理 
だ」と思って投げ出してしまうのでしょうか。ど 
ちらにしろ，一度とことんまでプログラミングに 
浸かってみるべき時期が近づいているようです。 
試しに BASIC で100行程度のプログラムを窨いてみ 
ることを勧めます。それを完成させることができ 
ればよし，できなくてもそれはそれでよしとしま 
しょう。しかし，完成できなければ，あなたには 
プログラムを作るのに必要な何かが欠けているも 
のと思ってください。 



忠告します。こ さらし b のにするために用 
意された タイプです^^^ え直してはどうでし 
ょう。とりあえずは， Sri !) (をすみずみまで読んで 
からもう一度挑戦すれば， B , C , D のどれかの夕 
イプに行けることと思います。 

それでも，「やっぱり僕はこのタイプだなあ」と 
思う人，少なくともこれからは，読むもの，見る 
もの，聴くものに，;主意しましょう。赤川次郎はい 
けません。あれは感性を擦り減らします。せめて， 
村上春樹を読みましよう。マンガなら「ぼのぼの」， 
アニメな らば 「 Mr . 味っ子」あたりがお勧めです。 
くれぐれもオタクと誤解されないよう注意しまし 
ょう。もちろん感性を磨くなら，やはりが 
いちばんだと思いますが。 

えっ？ C への適性はどうなのかって？ んな 
もんどうこういえる立場ですか。どうだっていい 
でしよう。わつ，怒ったあ？ 冗談だってば。 
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# 特集 



言語からの誘惑 


第1部 


入門 C 


- 'u'._ 


コンピュータの初心者は，ともすると言語 
を学ぶということを文法を覚えるというこ 
とと同義に考えがちです。しかし，実際に 
いろいろな言語を触ってみると，もっとも 
重要なのはその言語の思想といった部分で 
あることに気づきます0たとえば 「LISP 
はリスト処理が得意で COBOL はファイル 
処理が得意」なのではなく，これらではプ 
ログラム自体がリスト処理であり，ファイ 
ル処理なのです。その言語の思想に従って， 
処理を組み立てていくことがプログラミン 
グです。コーディング（実際の命令に置き 
換えること）自体は本筋ではありません0 
そして思想にはキーワードとなる概念があ 
ります。 C 言語の場合，その特徴として関 


まったく C がはやっている。中身は泥臭 
いくせに外兄がなんとなくアカデミツクで， 
しかも素人っぽ〈ない。そういう外面がよ 
いところが妙に受けているという言語であ 
る。 

かのダイクストラの神様がのたまったよ 
うな「構造化プログラミング」に向いてい 
るので一般ユーザーとは無縁に近い学者か 
らも絶饺されるようになってしまったのだ。 
その上，アセンブラレベルの細やかな作業 
も 高級語の複雑な制御構造 も併せ待って 
いるので，まさに地上最強の暗殺言語とし 
てパソコン界にもジワジワと根を伸ばして 
いるのである。 

しかし， C は本米関数型言語であり，こ 
んなメジャーになるような明るし、言語では 
なかったはずである。なにしろ一般の C 言 
語の入門書などには必ずといってよいほど 
次の一文が入る。 

C はべル研究所で UNIX 用に開発された 

言語である 

というものだ。 


数型言語である，データ構造が単純かつ柔 
軟であるといったことが挙げられるでしよ 
う 0 ここでは C 言語をまったく知らないと 
いう人を対象に，こういった基本概念を集 
中的に解説します。しかし，これだけで C 
言語の思想に迫ることはできません0本格 
的に C を始めようという方は 『 K & R 』 を一 
読することを強くおすすめします。 

C 言語は BASIC のように甘口の言語では 
ありません。だからといって， C 言語は言 
語の中でも特に難しいというわけではない 
のです。具体的にイメージをつかみ，そし 
てひたすら実践。これはどんな言語でも同 
じですね。実践編に進む前にここでしっか 
り基礎を固めておきましよう。 


ベル研究所というのは，アメリカでも超 
がっく一流研究所であるが，こんな説明を 
見て喜んでいちゃあ M る。私なぞはこれを 
読んだだけで「うわあ，堅苦しい」と思わ 
ず2,3歩ビヨンピヨンと退きたくなるほど 
だ。しかしパソコン マニアの なかには，逆 
にそういう堅苦しさにビヨンピヨン飛びっ 
いていく人が多いからなあ。 

で，ソフトの〈せにこんなに固い C 言語 
はさらに， 

システム記述用言語である 

などという暗さも持っている。 

0 S のようなものを記述するのに便利だ 
よというわけだが，じゃあなぜ 「 C は関数 
型言語である」なのか？ 関数ってものは 
f (X) とか COS 汐とかそんなやつだよねえ0 
システム記述は関数でするの？ などとっ 
らっら見ていくと，とんでもない！ 私の 
目に映ったのは，とても関数とは似ても似 
っかない C の本質なのだった。いったいぜ 
んたいどおこが関数型なんだよおおっ？ 
関数ってのはそもそも……。 


関数とは 7 

関数といえば，洋の東西を問わず f(X) 
だ。これはもうフーテンの寅さんが渥美清 
だというくらいの常識。 X は変数で，その 
値の範囲を定義域と呼び，プログラム ) IUS 
では引数（ひきすうと読む）などという。 
f (X) は X になんらかの操作を施した値を返 
す。 f ( x )=2 x とすれば，これは2倍する関 
数で……，ってことは学•校で習うこ I 。簡 
単にいえば， 

何か値を入れたら，何か返す 

という不気味な箱 （Black box ) なのだ 0 

さて，そろそろプログラムを出そう。 
main ( ) { } 

これが，最も短い C のテキスト（ソース 
プログラム）だ。この例は C の本には本、 1 '丨 
によく出てくるミーハーなやつで嫌いなの 
だが，ついつい私も使ってしまったという 
ていたらくである。 

先ほどの f ( x )=2 x との対応でいくと， 
f が main ，（） は （） だが， x はこの場は 
ない。また， { } のなかに=の右側の 2 x な 
どを書くところだが，これまたない。それ 
でも「どうだ関数型だろう j といいたいら 
しいのである。ほらね，イヤラシイでしよ 
う0実はこれ，1可もしないブログラムなの 
である。何もしないという割には，引数を 
入れる （） や定義を書く { } が残っているの 
だからなんか間抜けな感じがするかもしれ 
ない0ちなみにこのプログラムは， X 68000 
で RAM ディスクなどを使用しないと，龙 
行形式のファイルにするのに（つまりコン 
パイルするのに）およそ1分ほどかかる。 

次の例を出そう。 
main () 

{ 

printf(“Welcome to C .¥ n ”)； 

} 

う一ん，やだなあこんなプログラム〇こ 
れも C の入門書には必ず出て〈るタイプな 
んだ。例によって引数のない （） つきの main 
のあとに定義が書かれている。「なになに， 
main と printf (.) をすることか」。 

printf は C 言語本体のコマンドではなく 
オマケでついてくる関数だ。関数から関数 
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関数型言語として，システム記述用言語として，そしてアセンブラに代 
わる強力な能力を持つコンパイラとして注目の言語 C 。 果たしてその実 
態はなんでしよ5。あのゲーマー清水和人が FORT 闩 AN プログラマと 
しての意地をかけて C の本質に迫ります。 

Shimizu Kazuto 清水和人 
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を呼ぶと。でもって printf の引数はなんと 
文字列 “Welcome to C .” である。まあ， 

ここまでは和田アキ子に免じて笑って許し 
てあげよう。しかし，仏の顔も3度まで。 
ここでは printf という関数は， 

なんの値も返していない！ 

のである。ゲゲッ，なんだあ，ぜ一んぜん 
関数とちゃうやん，といっても， 

いや，何も返さなくても関数なのぢゃ 
と C はのたまいなさるのぢゃ。まさに，柔 
の頑固おじいちゃんそのもの，さすがはベ 
ル研，とこういうわけである0 

イヤラシイところはまだある。 printf の 
() のなかをよく見ていると，ほらほら腹 
が立ってくるでしよう？ この printf は画 
面に文字列を表示するわけだが， 1 ル数の最 
後の 「¥ n 」 ってのがあたしゃいやだね， 
というおばあちゃんも多いと思う。 ¥ n は改 
行の意味なのだが， C をこれからやる人は， 
何かのおまじないと思って必ず ¥ n をつけ 
るようにしてほしい。 C の本質を見和 S める 
鋭いあなたならいずれ理由がわかるはずだ。 

まだまだある。 printf の行の最後の；は 
何者か？これは文の区切りだってことだ 
から，これもそんなものかと思って納得し 
てほしい。それにしても，この11の位置の 
いやらしさ。 C でプログラムを書く人は， 
こういう風に1丨をつけると読みやすいと 
いうのだが，なんかヒラメの目みたいで力 
ッコ惡いねえ。 

さあ，これだけクドクドいえばそろそろ， 

C はなんてイヤな言語だ 
という暗示にかかってくれたろう。それじ 
ゃあ，もうちょっと現実的なプログラムに 
入ろうか。 

|| アカデミックやなあ 

さっそくだが，リスト1である。まずは 
関数らしいところを紹介しなければという 
ことで，ぐっとレベルを上げて足し算にい 
ってみる。 

見てわかるとおり， i は2, j は3で f ( i ， j ) 
の値を ij に入れて， i + j = ij を表示するの 
が main 関数である。は， ii と jj を 
足して値を返す関数である。 

情けないほど簡単だ，という人にはリス 
卜2をお見舞いしよう。これはなんと， 
Jog(l + x ) (| x |^ l ) 

を求めるプログラムである。へっへ〜， 

再帰を使っている 

んだよお。再帰ってえのは再び帰るの文字 
どおり，関数が自分で自分を使っていると 
いう機能で C 言語の特徴のひとつ，う一ん， 


アカデミック！ 

計算モデルは， 

log(X +1)= X - y + y-y +. 十を 

で級数展開されているわけだ。もっともこ 
んなアルゴリズムは遅いからパソコンのル 
ーチンには向いていないけどね。 

main の x が引数で，ここでは 0.5 にして 
いる。求める値は， log (1.5) になるわけだ。 
このプログラムは f ( x ) と g ( x ， i ) という関 
数を定義している c g ( x ， i ) のなかでは for 
( …… ） という記述がある力す，これが BASIC 
でいう for 〜 next にあたるやつだ。ちなみ 
に j + +というのは j=j + l という意味で， 
ここでは詳しく触れないが， C ならではの 
ぉいしい演算子である。また， val *= x と 
いうのは val = val * x の意味。ほかにもい 
ろいろあるから， Appendix のリフ アレン 
スをあとで見てぉいてほしい。 

g ( x ， i > は x の i 乗を計算している。 f ( x ) 
はそれを使って xVi を計算して，次の i を 
用いた計算のために，また f ( x ) を呼び出し 
て……とまあ，なんやようわからんけど ， f 
( x ) のなかにまた f ( x ) が書けるところが 
偉大だといいたいわけですよ。 

また，この例でもわかるように関数の定 
義のなかに for ループのような制御文が書 
けたりするのも特徴だ。ほ力 1 にも if 〜 else ， 
while ， switch 〜 case などの構造化制御文 
がいろいろと使えるというわけで， C の関 
数は，関数というょり， 

サブルーチンだ 

といってしまったほうが気が楽になるので 
あった。 

|| それではサブル-チ:^ということで 

なあんた； C はサブルーチン型言語かあ0 
そうなりゃ，わかりやすいってもんですよ 
ね。要するにサブルーチンを作ってどんど 
ん使う，これが C によるプログラミングと 
いうわけだ。実際 X 68000 の XC (Ccompi 
lerPRO -68 K とやら）には X 68000 の機能 
をフルにサポートしたサブルーチン（ライ 
ブラリ）がドカンとついてくるんた^。 

ではここからはちょっと， XC を例に取 
って遊んでみよう。 X 68000 以外のユーザ 
一の方には申し訳ないのだが，これからの 
C 言語のあり方を考えるうえで参考にはな 
るはずだ。 

まずはリスト3である。いきなりグラフ 
イックというわけで，内容を見ると，なあ 
んだ X-BASIC のサブルーチンを呼んでい 
るのかと誰でも気づいてしまうわけだ。そ 


ラ， 

XC では X BASIC と同等のシステムのサ 

ブルーチンが使える 

のであった。 

つまり， X 68000 にとっての C は， BAS 
1 C サブルーチンを組み合わせて構造化プロ 
グラミングを行うためのツールだったりも 
するのである。とはいえ，これは実はすご 
いことである。 X 68000 のソフト体系は， 
BASIC — C — アセンブラのラインでがっち 
り固まったようなものだ。たとえば，ダラ 
フィックを使って新しいサブルーチンを作 
ってしまったら，次はそのサブルーチンを 
使ってさらにすごいサブルーチンを作って 
いくこともできる。 

お次はリスト4 。 乱数ルーチン rand を用 
いた酔歩のプログラムである。酔歩とは， 
ョッパ ライのおじさん 力?， フラフラと歩い 
ているところからつけた名だ。 X 68000 の 
画面の色を変えながら pset が行くのである。 
j =1から30000までにしたが，無限ループ 
にすれば簡単な環境プログラムにもなる。 
受験勉強に疲れた頭を癒すには，こんなプ 
ログラムをい〈つも作っておくとよいので 
はないか。 

C なんて堅苦しく考える！：ろくなことが 
ないから，とりあえず BASIC ルーチンで 
遊ぶというのがお勧めだ。そうしているう 
ちに C のプログラミングを覚え，また発想 
も湧いてこようというもの。入門書の1ぺ 
リス ト1簡単な足し算 


mairu ) 

{ 

int i,j,ij ； 
i = 2; 
j = 3 ； 

j )； 

printf("%d+Xd=%d¥n",i,j,ij )； 

) 

f(ii,jj) 

int ii,j j ； 

{ 

return (ii+jj )； 


リスト 2 再帰を利用した 対数の計算 


main() 

{ 

float x=0. 5, f () ； 
int i=30; 

printf("log(Xf )=Xf¥n",.l+x,f(x,i ))； 

) 

float f(x,i) 
float x; 
int i ； 

{ 

float val,g ( ) *, 

i --1 

if (i==0) return(0 )； 
val=(2.0*(iX2)-1.0)*g(x,i)/i ； 
return(f(x,i)+val); 

) 

float g(x,i) 
float x ； 
int i ； 

{ 

float val=l.0 ； 
int j ； 

for(j=0;j<i ； j++) val*=x; 
return(1* va1); 
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ージ目から着実に進んで行くというのは考 
えないほうがよい。 

||んじや音楽でもや D てみよ〇か 

それでは， X 68000 の FM 音源を使ったプ 
ログラムを考えていこうじやないか0ルー 
チンは X - BASIC のルーチンをそのまま使 
っちやえ0というわけでリスト5である。 

これが基本形だ。 

まず， m _ init で FM 音源を初期化し ， m 
_ alloc で MML のトラックバッファを確保 
する 0 それを m _ assign でチヤンネルに設定 
し， m _ trk でトラックに MML を書き込む。 
最後に m _ play で演奏というわけだ 。 MM 
L については BASIC マニュアルや中森氏の 
連載を参照すればよい。 

リスト6は和音を鳴らすプログラムだ。 
文字列で音の名を入れると，それを同時に 
鳴らす。もちろん音は8音まで。 

ところで，さっきから気になっている人 
もいるだろう。リストの頭にある， 

# include 〈 stdio . h 〉 


リスト3点，円，ボック 7|， ペイント 

# include く stdio.h> 

♦include <basic0.h> 

# include <graph.h> 

#include <music . h> 



els(); 

screen(2 » 0 ( 1,1); 
vpage(1); 
pset( 110, 110,3); 

circle(200, 400, 100,4,0,360,200) : 
box(250, 250,300 ,300,8,32768) : 
paint(200,400,6 )； 
filU 150, 150,200 ,200,5 )； 


リスト 4 pSET による 描画「酔歩」 


finclude <stdio.h> 

#include <basic.h> 
finclude <basic0.h> 

#include <graph.h> 

#include く music.h> 
main() 

{ 

int i,j,im,ix=384,iy=256,rand ()； 
cls ()； 

screen(2,0,1,1 )； 
vpage(1 )； 

for(j=l;j<30000;j++) 

{ 

pset(ix,iy,i+1 )； 
im=i : 

i=rand()X30; 
if (i==0) ix ++； 
if (i = =l)ix —； 
if (i==2) iy ++； 
if (i = = 3) iy—; 
if (i>3) 

{ 

if (im==0) ix ++； 
if (im==l)ix --； 
if (im==2) iy ++； 
if (im==3) iy--; 
i = im ； 

) 

if (ix<0> ix ++； 
if (ix>768) ix —； 
if (iy<0) iy ++； 
if (iy>512) iy —； 


という部分である。これは， XC について 
くるライブラリを使うよということだ。た 
めしに， XC のシステムディスクの INCLU 
DE というデ'イレクトリでどんなライブラ 
リが用意されているか見ておくとよい。 

まあ FM 音源関係のルーチンは令部 musi 
c . h というインクルードフアイルで呼び出せ 
るから， 

# include < music . h > 

で OK だ。ほかにも， basic . h や basicO . h に 
便利なルーチンがいろいろ入っている〇た 
だし， BASIC のライブラリを使う場合には 
コンパイル時にオプシヨン指定で cc / W と 
しないとうまく コンパイルできないので気 
をつけよう（自分がひっかかっただけの話 
だったりして)。 

話がそれたが，リスト6に戾ろう。ここ 
では和音を表す文字データをポインタを使 
って渡している。ポインタというのは，そ 
のデータが入っているメモリの番地のこと 
で， * data というように， * のついた変数 
のようなものがその番地を表している。実 
は“”で囲んだ文字列データの場合，この 
番地でしか渡せないので，受けるサブルー 

リス ト5 MML を 使う 


# include <stdio.h> 

#include <basic0.h> 

#include <graph.h> 

♦include く music.h> 
roain() 

( 

m_init ()； 
m_alloc{1,2000); 
m_aaaign(1,1); 

m_trk(1,"Q7 @34 V9 04 T66") 
m_trk(1,"L16 CCCDEG8GFFFAG8") 
m_trk(1,_.L16 >G<DD4DE-E-DC2") 
m_play ()； 


リスト B 和音を鳴らす 


#include <stdio.h> 
tinclude <baaic0.h> 

# include く graph.h> 

# include <music.h> 
mai n() 

{ 

int i ; 

m_init ()； 

for(i=l;i<9;i++) 

{ 

m_alloc(i, 20001; 
m_as8ign(i,i )； 

) 

waon("CEG ") : 
m_play(1,2,3,4,5,6,7,8); 

) 

waon(data) 

char 拿 data; 

{ 

int i ； 

for { i=0;i<8;i + +) 

{ 

switch(*(data+i> 


case 1 C 1 

m_trk ( i+ 1• ••(?••) 

break 

case f D 9 

m trk( i + 1•"D” > 

break 

ease 1 E 9 

m_trk( i + 1 ,”E") 

break 

case f F 1 

in— trk( i+1 , M F M ) 

break 

case 'G 1 

m— trk ( i + 1 •”G” } 

break 

case 1 A 9 

m.trk( i+1• M A M ) 

break 

case 1 B 1 

m 一 trk 《 i+1•"B") 

break 

case 9 9 

m 一 trk( i+1•"R”} 

break 


チン側でも，ポインタで受けてやらなくて 
はいけないのだ。このポインタというのが 
あるおかげで， C ではアセンブラに匹敵す 
る柔軟なことができるのだが，逆に初心者 
には翊 I 解-しにくいということになっている 
のだ。 

さて， waon (和音）という関数の引数に 
なっている data というのが，この場合ポイ 
ンタで，文字列“ CEG ” の先頭にある“ C ” の 
アスキーコードが格納されている番地を指 
すことになる。さあ，このへんに興味を持 
っ？こらあなたもネクラな C の戦士だ。胸を 
張ってベル研への道を歩んで〈ださい。 

また，ポインタの意味なんて興味ないと 
いう比較的正常な方は，このプログラムの 
main 関数をいろいろと変えて遊んでみる 
とよいだろう。 

次のリスト7はちょっと初心に帰って， 
iHJiJj メロディ発牛:だ。ルーチン名も Bach 
(バッハ）とした。ここでも乱数が活躍して 
いる。もちろん自動作曲となると乱数ばか 
りではダメで，ある程度規則性を持ったな 
かで音を選ぶことが必要になる。音楽 W •き 
の人はぜひチヤレンジしてもらいたい。 


リスト7自動メロディ発; J プログラム 


#include <stdio.h> 

#include <basic0.h> 
tinclude 〈 graph.h> 

?include 〈 music.h> 
main() 

{ 

int i; 

char *bach(),*otolen ()； 
char mdata[2000] : 

)； 

for(i =l ； i< 9;i++) 

{ 

m_alloc(i, 2000 ) : 
m_assign(i,i); 

) 

for(i=l;i<2000 ； i+=4) 

{ 

streat(mdata, bach ())； 
strcat(mdata,otolen()); 

} 

printf("Xs¥n",mdata}; 
m_trk(1,mdata) : 
m_play(1 )； 

) 

char *bach() 

{ 

int i ; 

i=rand()%13 ； 
switch!i) 


case 

case 

case 

case 

case 

case 

case 

case 

case 

case 

case 

case 


: return 
: return 
: return 
: return 
: return 
: return 
: return 
: return 
: return 
: return 
10:return 
11:return 
case 12:return 


•• C" ； break 
"C# M ； break ； 
"D" ;break 
"D #，.； break; 
"E" ；break 
"F" ；break 
"F#" ； break ； 
， .G" ; break 
"G#";break ； 
"A" ；break 
"A 黍 ，， ;break; 
"B" ；break 
"R";break ； 


char *otolen ㈠ 

{ 

int i; 
i 二 rand()%3 : 
switch(i ) 


case 0 
case 
case 2 


: return " break; 
: return "8 ";break ； 
: return "2 ’• ； break; 


48 Oh ! X 1988.7. 




























/* カツブラーメ ンの作成*/ 


/* 自動作曲ブログラム */ 
roain() 


恩恵にあずかれたではないですか 。 printf 
のなかでそのまま関数の名を書いてやれば， 
FORTRAN や BASIC のようにわざわざ変 
数を使って値を返さなくてすむ（わかるか 
な？)。 

ご覧のように逆三角関数 （ arccos など） 

や双曲線関数 ( cosh ) も入っている。 X 68 
000で数値演算をしたい人は， BASIC なん 
か使っていたらどうしようもないよ。これ 
はもう C でプログラムを組むっきやない0 

リスト9未完のお喋りプログラム 


static char data[ 50 ][ 3900 ] ; 
mam() 

{ 

char dat[ 100 ]； 

strcpy(dat[0] f H . M )； 

pronou(dat); 

} 

pronou(dat) 

char dat[ 100] ; 

{ 

if (dat[1]==’ ア ’} a—play(data[1] ， 2,3 | ; 
if (dat[1 】 ==’ ィ ， > a 一 piay(data[2 j f 2,3 )； 


リスト 10 幻のメインルーチン 3 部作 


/* 冷蔵！*の掃除 %/ 


|パソコンの C とは 

このように， X - BASIC の FM 音源ルーチ 
ン（〈どいようだが関数のことだよ）を使 
うような例で見ると案外初心者でも C は役 
に立つ。他の パソコンで いまひとつ一， 

ーザーに普及しないのは，やはり「関数 
イブラリが貧弱だから」なのだろう 
フィック，サウンドなどと，いちいち I/O 
を考えながらサブルーチンを組むような使 
い方では，難しくてせっかくの素晴しい威 
力を持つ C も使いこなせない。その点 ，X 
68000の持つ機能を生かすライブラリの充 
実が XC の魅力となっているのである。 

ところで，関数型といっても実はサブル 
ーチンに毛の生えたような形をとる C 言語 
がなぜシステム記述言語といわれるの力、。 

もうおわかりかもしれないが，ハードウェ 
アを扱うルーチンを自在に組み合わせてコ 
ンパクトなマシン語に落としてくれるから 
だ（比較の問題だよ，誰だい C で書くと大 
きくなるっていってるのは）。高速だし， 
キー入力も少ないし，使いこなせればいい 
言語なんだろうなあ。 

プログラムの例を続けよう。今度は X 68 
000ご自慢のスプライトを使ってみたい。 

スプライトのライブラリも X - BASIC のル 
ーチンとそっくりなのがある。これについ 
ては中森氏の 「 X 68000 BASIC 入門」の第 
4回 （1987 年11月号）に詳しく載っているの 
で参考にしてほしい。 

ここでは簡単なパターンを定義して，そ 
れをさきほどの酔歩のように動かしてみた 
(リスト8〉〇これは環境ソフトに発展でき 
そうだ。こうやっているとなにか X 68000 を 
制觀したような気分になって〈る。 

かまわず続けて，今度はリスト9。が， 
これはこのままでは動かない。一応おしゃ 
ベりをするようにしたいのだが ， ADPCM 
用の音声データを入力しなくちゃいけない 
のだ。膨大な量のサンプリングデータを載 
せるわけにもいかないので，ここでは形だ 
けの紹介としよう。 

関数型言語のよいところは，細かいこと 
を気にせずに，まず全体の機能を考えてか 
ら次第に細かくプログラムしていくという 
トップダウン方式がとれることだ。私は昔 
からトップダウンが好きで，何かパソコン 
にやらせたいと思うとメインルーチンだけ 
作ってみたりする。 

たとえば，リスト10に挙げた3つなんか 
どうだろう。ひとつは冷蔵庫のなかを掃除 
するプログラム（バカだね，しかし），ひと 


つは自動作曲プログラム，最後のひとつは 
カップラーメン作成プログラムである。ま 
あ，退屈でヒマなときがあったらこんなの 
を書いてみるのも一興だろう。不思議なこ 
とに書いたものを眺めていると，なんだか 
本当にできそうな気がしてくるものだ。 


般ュ 

^ II 


X - 巳 ASIC はインタプリタ C (7) 


X - BASIC のコマンドば'かり使ってフ。口 
グラムを組んでいると，まるで X-BASIC 
がインタプリタ型の C なんじやないかと錯 
覚を起こす。まあ，最初からそのつもりで 
作られた BASIC だから当たり前なのだが， 
X - BASIC をやっておけば C にも入りやす 
いということも見逃せない。だいたい BAS 
1 C と同じライブラリは 「 BASIC マニュアル」 
を見ながら作成するわけだから，まったく 
C だか BASIC だかわからなくなる。 

さて，今度は BASIC 以外のライブラリを 
使ってみよう力、。ん 一， ちょっと固い話だ 
が，ライブラリ math . h から数値演算に関す 
る主な関数を取り出して紹介しよう。リス 
卜11がそれである。 

よく見ると，おおつ，やっと「関数型 j の 


リスト日 スプライトイ 


動かす 


# include <stdio.h> 

# include <basic0.h> 

#include <graph.h> 

#include 〈 music.h> 
char data[255]= 

{0，0,0，0，0，0,0,0，0，0，0,0, O ,0, 0，0 


0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 

main() 


3,3 

0,3 

0,3 

0，3 

0,3 

3,3 

0,0 

6,6 

0,6 

0,0 

0,0 

0,0 

0,0 

0,6 

6,6 


0)； 


int i,j,im,ix=128,iy=128; 
cls ()； 

screen(0,3,1,1>; 
sp_clr(0,255 )； 
ap_off(0,127 )； 
ap_def(0,data )； 

9p_disp(1 )； 

for (j =1；j < 30000 ；j + +) 

{ 

sp_move(0,ix,iy,0 )； 
im=i ； 

i=rand()X15; 
if (i==0) ix++ 
if (i = = l) ix— 
if (i==2) iy++ 
if (i==3) iy-_ 
if (i>3) 


if (im==0) ix++ 
if (im==l)ix-- 
if (im==2) iy++ 
if (im==3) iy-- 
i = im; 

} 

if (ix<0) ix++; 
if (ix>256) ix —； 
if (iy<0) iy++; 
if (iy>256) iy—; 


3creen( 2,0,1 


L )； 


くぶ ， 

行邐 () 

へを る 
アン け 
トメ ； 開 
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•，スラ；； ろ .，夕； 
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をビスへをり帰沸メをるけす () 
金ンンジ金釣にを一湯べ付化 in 
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) •，め決 () 
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それでは，やっと関数らしい関数が出て 
きたところで，ちょっぴり変わったプログ 
ラムを紹介しよう。リスト12がそれである 
おおっ，今度は main の （） のなかに引数が 
入っている。そうです，このようにした場 
合， Human 68 k のコマンドラインから， 

A>SAMPLE 5 

のように引数を（この場合は 5) を入力で 
きるのであった。とっさに思いつ〈使い方 
としては「究極のプログラム電卓」。実験デ 
—夕をまとめてレポートにするときのやや 
こしい計算も C があれば大丈夫。ちょちょ 
いのちょいというわけでプログラム電卓を 
買うお金があったらゲームソフトにでも回 
しましょラ C 

この例を見ると，引数が2つなのにコマ 
ンドではひとつの引数しか入れていない。 
これは第1引数には，引数の数が入るため 
だ。プログラムのほうの事情として，もし 
引数の数が違っていたら何かのエラー処理 
が必要なので，こういう規則になっている 
というわけだ。一見間違いやすいから注韋 
が必要だろう。でも使いなれると文字列の 
形でも入るのでフアイル名などの記述に非 
常に便利。まさに 0 S から直接呼べる関数 
なのだ。 

う一ん，そう力、。やっとわかってきたよ 
うな気がするぞ。 0 S から引数が渡せるか 
らシステム記述に向いているんだな。 C を 
使っていろいろな コマン ドを作っていくこ 
とができるじゃあないか。つまり，まず‘‘コ 
マン ド名. c ” という C のソースを書いて cc . 


x ( コンパイル&リンク）にかければ， 
ンドー丁出来上がりってことだ。 


^ II 

: II 。 に 


リス ト11数値演: 


例 


# include <staio.h> 

# include <basic0.h> 

#include <graph.h> 

#include 〈 music•h> 

#include <math.h> 
main () 

{ 

printf("arccos(0•5)=Xf¥n’•acos(0•5 } } 
printf( M arcsin(0.5)=Xf¥n",asin(0.5 )) 
printf("arctan(0,5)=%f¥n",atan (0.5)) 
printf( M cos(pai)=Xf¥n M ,cos(pi)) 
printf("sin(pai)=%f¥n",sin(pi)) 
printf( M tan(pai)=Xf¥n M ,tan(pi)) 
printf("cosh(0.5)=%f¥n M ,cosh(0.5)) 
printf( M sinh(0.5)=%f¥n M ,sinh(0.5)) 
printf (” tanh (0.5) =Xf¥n ,# f tanh (0,5)) 
printf("exp(0.5)=Xf¥n M ,exp( 0.5)); 
printf( M log(0.5)=Xf¥n M f log(0.5)); 
printf( M logl0(0.5)=Xf¥n M f logl0(0-5)) 
printf f pow(2.0, 10.0 ))； 

printf( M root(2)=%f¥n M ,sqrt(2.0)); 


リスト 12 コマンドの作成 


# include <stdio•h> 
main( 1 9 j) 
int i ; 
char < j []； 

{ 

if ( i ! =2 ) printf ( "error! ! ¥n ,f )； 
else 

printf( M %8¥n M f j[l ])； • 


明日はあるのか 


以上， c のさわりの部分をちらちらと眺 
めてきたわけだが，じゃあ C にとって「明 
H はどっち」なのだろう。とはいっても， 

C には構造体，共用体，記憶クラスなど， 
まだまだ難しい機能がいっぱいあるので， 

これだけのことから何かいえる筋でもない 
のだが，あえて考えてみよう。 

ではリスト13を見てもらいたい。これは， 
test . dat という ファイルに キーボードから 
入力したデータを書き込んでいく ブロ グラ 
ムである。男の勝負は一見してどう感じた 
かで決まる。 

1) うわあ，こんなの絶対わからん。兄た 
だけでめまいがする。 

— こういう人は，はっきりいって C には 
近寄らないほうがいい。 

2) うっそ 一， わかんない。でも面 fl そう。 

— こんな人は，祝氏が始める連載講座に 
進んでください。 

3) なんだ，こんなの簡単じゃん。 

—あなたはどうしてこんな文章を読んで 
いるのか。さっさと，第2部に進んだほ 
うがいいですよ。 

これがすべての答えだと思う。リスト13 
の例のように， C はファイルを扱うのに便 
利な機能を備えている。しかし，どうもと 
っつきが悪い。何か人を寄せつけない雰 RH 
気がリストから漂ってくるではないか。そ 
の原因は果たしてなんだろう。 

第1に，括弧の多さである。引数を M む 
小括弧 （ ），手続きを關む中括弧 I 丨，そし 


リスト13謎の データ 入 


力関数 


て配列の添え字の大括弧 [] と，これで高 
校があれば R 本の教育制度である。だいい 
ち，こんなリスト，声に出して読めないじ 

やない？ main ( ) | . を「メイン小カツ 

コカツコ中カツコ . 」などと読み出した 

ら，思わず「静かな湖畔の森のかげっから 
っ . 」と歌ってしまうではないか。 

とっつきにくい2番目の理由は，省略形 
が多いこと。 i ++ とかのインクリメント•デ 
クリメント演算子を考えたのはセンスがあ 
るが，どうもリスト全体の表現が簡潔過ぎ 
てプログラムをわかりにくくしている気が 
する。 

そして最後は私の嫌いなボインタという 
概念だ。プログラムが高度になれば，ボイ 
ンタのポインタの配列だとか，もっと複雑 
な使い方もバンバン出てくるってんだから 
お手上げである。リストに*がひとつ抜け 
ていただけで泣いたプログラマも多いので 
はないか。 

ただ今回いろいろと試してみた結果わか 
ったことは，そんな難しい機能は使わずに， 
とりあえずライブラリを使って遊ぶ気持ち 
でいれば，一変してなかなかにイイ言語に 
なってくれるという こ とだ。特に XC の ラ 
イブラリの充実度は群を抜いている。 X 68 
000 ユーザーには 「この 果報者！」 といって 
鼻を指でつっ突きたいほどだ。だから C の 
本など読むのはやめて，まずいじくってみ 
ること。そこから道が開けようと悟った私 
であった。 


II 


めでたし，めでたし 


# include <stdio.h> 

# include <fcntl.h> 

#include <fctype.h> 
linclude <stat.h> 

#include <io.h> 
main() 

{ 

int ill,ilen; 
char dum[ 811; 

if ((fil = open("test.dat M ，〇 JTRUNC 丨 0—WRONLY>)<0) 
if ((fil=creat(^test16.dat M ,S_IWRITE))<0) 
exit(0 )； 

whiled) 

{ 

printf("Vndata ? M ); 
scanf("Xs",dum); 
strcat(dum, M ¥n M ); 
ilen=atrlen(dum); 
if(dum[0]== , / 1 ) break; 
if(write(fil,dum,ilen)<0) 

{ 

printf("error!!¥n M ); 
break ； 


close(fil )； 


いやあ，素晴しい。まさに完璧な言語で 
した。なんといっても関数型の特徴を実に 
よく生かしていて，まさにシス 
テム記述や OS のユーテイリテ 
イ作戦にはもってこいですね。 
しかもライブラリを使えばハー 
ドの機能を生かすのも非常に簡 
単だし，ソースコードの打ち込 
みも省略形が多いから短時間で 
すみますよね。 

だから最初に言ったじやない。 
いい言語で僕も大好きだって。 
絶対メジャーになるって。え？ 
言ってない？ んなことないよ。 
錯覚錯覚。皆さ4も絶対に C の 
勉強しましょうね。祝さんの連 
載も始まるし。 C をやれば BAS 
1 C がイヤになるよ。ほんとに。 
やってて損はないよお。と，こ 
う書いたら怒られるかしら？ 
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テ - 夕構造からの “ Hello C World w 

初心者にとって最難関となるのがデータ構造でしよう。抽象的になりが 
ちなテーマですが，具体的にどラいった処理が行われているのかを中心 
にイメージを作りあげるように解説してみました。データ構造を理解す 
ることが C 言語入門の最大の課題です。 

Sohma Hidetomo 相馬英智 


|| C とテータ構造の重要性 


C 言語はとってもおいしい言語です。お 
いしいとするにはそれなりの理由がいるわ 
けですが， C は BASIC に比べれば速いし 
(コンパイルす るから当たり前），小回りが 
きくし， 0 S とは仲がいいし，複雑なデータ 
構造が扱えたりするところがおいしいのだ 
ろうと思います。その中でも特に広い意味 
で C のおいしさの60〜70%ぐらいが，デー 
夕構造あたりにあるのではないでしようか。 
そこで，ここではデータ構造という面から 


C について考えてみましよう。 

しかし，データ構造には BASIC にない 


概念も多いので，入門者にとって脱落者の 
もっとも多いところでもあるのです（特に 
ボインタ関係)。入門者がデータ構造でつま 
ず〈理由についても考えてみたいのですが， 
これはパソコンでよく使われる入門者用の 
言語（特に BASIC ) は一般にデータ構造が 
貧弱であるためと思われます。このため， 
BASIC しか使ったことのないユーザーは 
データ構造やこれを主体とした処理のアル 
ゴリズムなどについては知識が不足気味の 
ようです。しかし，データ構造を有効に活 
用するというプログラムテクニックはきわ 
めて重要なものなのです。 

PASCAL , C などの ALGOL 系の言語で 


はこのことをとても重視して設計されてい 


ます。これは， PASCAL などの言語の生み 
の親である N . Wirth 大先生がこのことを 
きわめて重要視したためです。現在パソコ 
ン関係の人なら誰でも知っているデータべ 
ースというものは，このデータ構造の考え 


方を大きく発展させ，複雑で膨大なデータ 
を使いやすくし実用化をはかったものとい 


えます。 

入門者にとって， C などは変数の宣言す 
ら面倒に見えると思います。しかし，変数 
の宣言ひとつとってもその意味にはかなり 
深いものがあります。また C では比較的自 
由に データ 構造を使えるので，これを使い 
こなせば複雑な処理を比較的簡単に記述で 


きるのです。 

II 変#は言吾る 

皆さんは変数をどんなイメージでとらえ 
ていますか？もっとも一般的なとらえ方 
は，数値などを入れる入れ物のようなもの 
だと思います。しかし実際コンピュータ内 
では，この入れ物に直接相当するものはあ 
りません。ではどうやって変数を実現する 
のかというと，コンピュータ内の記憶領域 
の一部（レジスタを含む）を変数と見立て 
ているのです。 

といってもマシン語を使ったことのない 
方には理解しにくいでしようから，コンビ 
ュータの記憶構造から説明しましよう。 

コンピュータには大きく分けて2つの記 
憶領域があります。ひとつは主記憶と呼ば 
れるもので，一般に半導体メモリ（メモリ 
1 C など）で構成されています。そしてもう 
ひとつが補助記憶（装置）と呼ばれるもの 
で，具体的にはディスクや磁気テープなど 
を指*します。この両者の違いはデータの読 
み書きに必要な時問（アクセスタイムとい 
います）と，どのくらい多くのデータを格 
納できるかという記憶容量に表れます。そ 
の構成部品の特性によって，主記憶はアク 
セスタイムが®[く高速にデータの読み書き 
が可能であるが，価格の面から記憶容量を 
大きくできません。これに対して，補助記 
憶は安価に大容量にできるのです力':，アク 
セスが低速になってしまうのです。 

したがって，コンピュータでは頻繁に使 
うデータを主記憶に置き，あまり頻繁に使 
わないデータを補肋記憶などに置くことで 
データのアクセスタイムを短く抑え，処理 
能力を向上させています（これを記憶の階 
層化といいます）。 

パソコンな どの小型の コン ピュータの場 
合，主記憶はメモリチップのみで構成され 
るのでメモリ空間などということもありま 
す。しかしここでは，私の独断で主記憶空 
間といういい方で統一します（本当は，ど 
っちがいいのだろう？ でも，難しい本は 


主記憶空間っていうのよね)。 

さて今までの話から想像がつくと思いま 
すが，一般には頻繁に使われるデータを格 
納する変数はプログラムの高速化のために 
主記憶上に作られるのでした。そこで注意 
しなければならないことは，現在のコンビ 
ュータの多くがストアードプログラミング 
方式（ノイマン型）というやり方をとって 
いるということです。この方式は主記憶空 
間にデータであろうがプログラムであろう 
が一緒に置いてしまおうというものです。 

厳密にいうと OS などが，データとプロ 
グラムをある程度区別して扱ってくれたり 
します（あくまでもある程度だよ）。しかし， 
主記憶空間に置いてしまえば，どちらも単 
なる1と0が並んだだけのもの （ 1と0の 
ビット列）となってしまいます。したがっ 
て OS が馬鹿な場合は特に，どれをデータ 
とし，どれをプログラムとするかは実際に 
処理するユーザープログラム次第となって 
しまうのです。 

これは一歩間違うとプログラムを破壊し 
たりする可能性を秘めていますが，狭い主 
記憶空間しかない場合などは，プログラム 
自身でプログラムを書き換えることでプロ 
グラムを有効に使えるようにすることが重 
要な意味を持つことがあります （16 ビット 
機以上では百害あって一利なし）。とにかく 
大事なことは主記憶空間にデータもプログ 
ラムも存在してしまうんだよということで 
す。 

では次に主記憶がどのような構造をして 
いるかを見てみましょう。主記憶空間は8 
ビット （1 と0だけの2進数が8桁，まと 
めて1バイトともいいます）ごとの小さな 
番号の ついた 箱の集まりとみなすことがで 
きます0この番号をアドレスといい， 0力、 
ら順番に主記憶の量だけの値をとります。 

たとえばあるコンピュータ内の主記憶容量 
が 64 K バイトだと，一般にコンピュータの 
世界では， 

K = 1024 ( = 2 10 ) 

なので， 

64 K バイト =65536 = 10000 h 
つまり，16進で1000 0 H 個の箱があることに 
なります0その箱にはそれぞれアドレスが 
あるのですが，アドレスは0から始まるの 
で000 0 H から FFFF H までの番号があること 
になります。この箱を人の住んでいる家と 
見なせば，このアドレスは番地のようなも 
のです0そこで，このアドレスという言葉 
は日本語では番地と訳されたりします。 

そこで主記憶空間は1次元となっていて, 
イメージ的には図1のように連続した帯の 
特集データ構造からの" Hello CWorld " 〇1 






図 1 メモリのイメージ 


図2 変数のイメージ 
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表1基本データ型 (XC の場合) 


型 

サイズ 

表現できる値の範囲 

char 

8 ビット 

-128-127 

int 

32 ビット 

一 2,147,483,648 〜 2,147,483,647 

short int 

16 ビット 

一 32,768~32,767 

long int 

32 ビット 

- 2 , 147,483,648~2,147,483,647 

unsigned char 

8ビット 

0-255 

unsigned int 

32 ビット 

〇〜 4,298,967,295 

unsigned short int 

丨6 ビット 

0~65,535 

unsigned long int 

32 ビット 

〇〜 4,298,967,295 

float 

32 ビット 

|〇-37~ |〇38 

double 

64 ビット 

約 |〇-3〇し 10308 


ようにみなすことができます。 C では，こ 
の主記憶空間のイメージが絶対必要ですの 
で，しっかり頭に叩き込んでおいてくださ 

い0 

さて変数の話に戻りましよう。主記憶空 
間が1バイトごとに区切られているという 
のは物理的な（機械がどうできているかと 
いう）話で，我々はこの1バイトにあまり 
とらわれずに記憶空間を使うことができま 
す。 

しかし， コンピュータ 自体がこの1バイ 
卜を基準として処理を行うように設計され 
ていますので，具体的には1〜数バイトを 
まとめて変数として使用します （ C の場合， 
多少の例外があったりします）。つまり，記 
憶空間の連続した一部分（数バイト）を大 
きな箱に見立てて，変数としています。し 
たがって，変数は必ず自分が記憶空間のあ 
る位置としてのアドレスまたはそれに類す 
る値を持っています。これをイメージ的な 
図にしたものが図2です。 

多くのプログラミング言語では，この変 
数のアドレスを具体的に知ることや主記憶 
から直接データを読んだり書いたりするこ 
となどは難しくなっています。というのは， 
主記憶空間にあるのは変数のみではなく， 


プログラム 自身 や コン ピュータ内部の重要 
な情報がたくさん蓄積してあるためです。 
万一これらが書き換えられるとコンピュー 
夕が異常な動作をしかねません。しかし C 
ではこれをボインタというものを使って簡 
単に知ることができます。これは危険なこ 
とですがこれによってマシン語で書かない 
とできないようなことまで可能となり，う 
まく使えばかなり面白いことができます。 

II 変数と型 

次に変数の型というものについて考えて 
みましよう。変数に格納する値にはさまざ 
まなものがあり，数値，文字，文字例（文 
字が集まったもの）などを基本として，数 
学的な論理値，集合などが考えられます。 
しかし，コンピュータ内部ではすべての値 
が2進数の数字で（つまり1と0だけが並 
んだビット列で）表現されているのでした。 
たとえば，文字はキャラクタコード（また 
はシフト JIS コード）と呼ばれる番号が各 
文字につけられていて この 番号で表現され 
ています。 

そこで各変数を使うときには，そこに格 
納するデータの内容についてコンピュータ 


に知らせる必要があります。 C などのプロ 
ダラミング言語ではその領域に格納された 
ビット列を数値として解釈するのか，文字 
として解釈するのか，それともほかの値と 
して解釈するのかを変数を宣言するときに 
コンピュータに知らせます。 

また，格納するデータによって変数その 
ものが記憶空間に実現される領域も変化し 
ます。具体的にいうと C では型によって変 
数が何バイトとなるかというサイズが異な 
っています（参考までに XC の型とサイズ 
を表1に示します）。つまり，変数を宣言す 
るということは変数を型に合わせて記憶領 
域に生成し，その変数に名前を （ C では変 
数や関数などの名前を総称して識別子とい 
っています）つけることを意味します。さ 
らに， C では記憶クラスといって変数を具 
体的にどのように生成するかを指定するこ 
とができたり，変数の生成を言語の処理系 
にまかせず，我々が直接変数を生成できる 
ような（実際は記憶領域を確保する程度） 
関数も準備されています。これらを使うに 
はそれなりのテクニックが必要なので最後 
に述べることとして，まずは標準的な C の 
データ型について見ていきたいと思います。 

C の基本データ型 

C のデータ型は大きく分けて基本データ 
型と，それらの組み合わせで作られる構造 
データ型（これには正式な名前はないよう 
です）と，あの高名な（悪名高き？）ボイ 
ンタがあります。そこでいきなりですが， 
基本データ型に ついて 見ていきましよう。 

基本データ型はその名前のとおり，きわ 
めて基本的なデータ型で複雑な構造などと 
いったものを持ちません。一般的に C には 
整数型，浮動小数点型の2つがあり，最近 
の傾向としてはこれらに列挙型， void 型（関 
数の帰り値の型のみに有効）を加えたもの 
が標準になりつつあります。しかし， C の 
サブセットなどでは列挙型や void 型はも 
ちろん浮動小数点型すらサボートされてい 
ない場合がありますので注意してください。 

それでは整数型から見ていきましよう。 
整数型は文字どおり数値のうち，整数を格 
納する変数です。どうして，数値のうち整 
数だけを特別扱いするのかというと，プロ 
グラムの中でこの整数の処理が群を抜いて 
多いということが挙げられます。そこでこ 
の整数だけを扱う変数を作ることで処理の 
高速化などをはかろうというわけです。 

先ほど コンピュータ 内のすべての データ 
は1と0のビット列でしか表現されないとい 
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う話をしました。問題はそのビット列の取 
り扱い方なのです。実は単純に数値ひとつ 
をとっても，その表現のしかたはいくつも 
あります。そこで整数型は一般に2の補数 
表示という表現のしかたを用いて値を格納 
しています。このやり方は整数の格納に向 
いていますが大きな数の格納には不向きで 
す。しかし，整数の処理が単純で高速化が 
はかれる！：いう利点があり，多くの言語の 
整数型がこの表現方法を採用しています。 

一般に整数型には， int 型と char 型があ 
ります。 int 型は整数を格納するためのも 
ので変数の型としてはもっとも頻繁に使わ 
れるものです。通常， long と short があり， 
格納できる値（整数）の最大値が異なりま 
す（これについて XC の場合を表1に示し 
ます）。 

int 型だと格納する変数の範囲が狭い！： 
いう人がいるかもしれません力 ? ， C の整数 
型は処理速度の向上を狙って設計されてい 
るという感じが強くなっており（一般に16 
ビット以上のマイクロプロセッサではアキ 
ユムレータと同じ大きさになっています）， 
そのためあまり範囲は重視されていないよ 
うです。 

どうしても大きな値を格納したいときは， 
のちに述べる浮動小数点型を使ってくださ 
い。これは，格納する値の範囲や精度を重 
視したものとなっていて，その分速度が犧 
牲にされており，処理が遅くなることはい 
うまでもありません。 

また， char 型は文字型と呼ばれるもので 
整数型と区別されることもあります。これ 
は文字 （1 文字）を格納するためのもので 
すが，実際はキャラクタコードつまり整数 
値として処理していますので整数型といっ 
たほうが適切だと思います。ここでいう1 
文字というのは半角1文字のことで，要す 
るにキャラクタコード表に載って いない 文 
字（コード）は格納できません（全角文字 
を格納するには2バイト必要です）。 

さて， C では文字は‘’でく くることで対 
応するコードの値として示されます。例と 
して char 型の変数 c に文字 A を代入してみ 
まし J ： ラ0 
char c . 
c =‘ A ，； 

無論，複数の文字を一度に‘ ’でくくるこ 
とはできません。 

さらに最近は int 型， char 型に unsigned 
が指定ができるようです。この unsign 指定 
をすると変数の取り得る範囲が変わり，正 
の値しか使用できなくなりますが，正の値 
が倍の範囲だけ使えるようになります。つ 


まり整数型は通常，値を2の補数表示とい 
う数値の表現方法を用いて値を格納してい 
ますが， unsign 指定をすると絶対値表示と 
いう表現方法を用いるようになります。 

C ではビット処理を行うことがあるので 
すが，このときに2の補数表示を使ってい 
るとまずいことが起こります。そこで代わ 
りに絶対値表示を使ってしまおうというも 
のです。この指定は，もともとビット処理 
を行うときにハ。ワーを発揮するもので通常 
はあまり使用しません。 

次に浮動小数点型ですが，これには整数 
や小数などの数一般の値を格納するもので 
(無論，変数内部では浮動小数点表現を用い 
ます）， float と double の2つがあります。 
float と double の違いは格納された値の精 
度が異なることです。いうまでもなく ， do 
uble を用いたほうが高い精度の値が得ら 
れます。しかし C の浮動小数点型は演算結 
果に得られる精度を重要視していて処理速 
度は遅くなっています。はっきりいって， 
オマケみたいなものです。長い目で見てや 
ってください。 

そして最後に列挙型， void 型ですが，こ 
れらについてはサポートしてない C がある 
ことなどから今回は割愛させていただきま 
す。それでは，これらの基本データ型を用 
いて形成される構造データ型について話を 
進めたいと思います。 

II 構造デ-夕型 

これまでの話はデータ構造の中でもきわ 
めて基本的な話で，これ以降の話が本当に 
データ構造らしい話となります。それにと 
もない，話も少し難しくなるかもしれませ 
ん〇 

今まで話した基本データ型は変数そのも 
のにつ いての 話で，各変数にはひとつの値 
しか格納できませんでした。また格納され 
た値同士の関係と.いったものは全然表現さ 
れませんでした。しかし，これから説明す 
る構造データ型は基本データ型の変数を組 
み合わせることで変数に構造を与え，デー 
夕の値だけではなく，そのデータ間の関係 
や構造までも表現してしまおうというもの 
です。 

実際に私たちのまわりに存在する情報を 
見回してみると，情報がひとり立ちしてい 
るわけではなく，情報同士はもちろんのこ 
と，いろいろな要素と複雑にからみあって 
います。そこでその情報（データ）を格納 
する変数に構造を与えることでデータの持 
っている特性を無理なく吸収し，表現して 


しまおうというのがデータ構造の狙いなの 
です。 

ここまで話せばデータ構造の重要性と， 
それがしっかりしているプログラミング言 
語がいかに優れているかということがわか 
ってもらえるものと思います。 

ただ注意すべき点はデータを処理するの 
はコンピュータなので，コンピュータにと 
って自然で無理のないデータの表現で処理 
効率の向上や高速化をすることが重要です 
( 無論，得られた結果を人間が理解しやすい 
ようにすることも重要です）。そこでしばし 
ば，私たちにとって理解しがたいデータ構 
造を用いることがあります。しかし今のと 
ころ特殊な例を除くと，極端なまでに複維 
なデータ構造はあまり効率がよくありませ 
ん。むしろ，単純なデータ構造をうまいこ 
と組み合わせたようなものがよい結果を生 
み出すことが多いようです。したがって複 
雑なデータ構造といっても，それは基本デ 
ータ型に比べて複雑という程度ですので安 
心してください。 

さて C の構造データ型には，配列，構造 
体，共用体が用意されています。それて"は, 
それらに ついてひとつずつ 兌て いきたいと 
思います。 

|| 毎度お,馴染&の配列 

まず BASIC でもお馴染みの配列です。 
配列とは，ある特定のデータ型の変数を複 
数集めて，ひとつの変数（データ構造）と 
するものです。同じ型で表現された値を複 
数格納できますので，区別をするために格 
納する位置に番号をふります。この番号を 
添え字といいます。実際に配列を宣言した 
ときの主記憶上にとられた配列の状態を図 

図3配列の実際 


int 型のサイズが4バイトのとき 
int a [2][3] ;と宣言すると 
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3 に示します。 

これを見ればわかるように同じ型の複数 
の変数を連続した領域に取ったように見え 
ます。そこで，配列のとる記憶容量は要素 
の型のサイズの要素数倍となっていて，単 
純に計算することができることがわかりま 
す。 C の構造データ型などの場合，実際に 
使う変数（データ構造）がコンピュータ内 
でどのように表現されているかを知ってお 
くことは，きわめて重要であると思います。 
しかしマシン語が使える程度の知識までは 
要求しませんので，安心してください（これ 
でも C は一応，高級言語ですから）。 

さて， C で配列を宣言するときに注意し 
てほしいことは，使用する添え字が必ず0 
から始まるということです。したがって， 
以下のように int 型の配列 a を宣言すると， 
int a [5] ； 

配列 a の要素数は5個で，添え字は0から 
始まるので0から4までの5つが使えるこ 
とになります。また，多次元の配列を使う 
ときは，各次元ごとに添え字を‘[’と‘]’の大 
括弧でくくります。たとえば2次元の配列 
b を宣言して，値を代入するときは， 
float b [5][5] ; 
b [3] [2]=1.5； 

というように書きます。これらのところが' 
ほかの言語と異なりますので注意してくだ 
さい。 

さて， C には char 型（文字型）と呼ばれ 


るものはあるのですが，文字列型というも 
のはありません。文字列とは，複数の文字 
が連なったデータのことをいいます。とい 
うと難しそうですが，我々が文字のデータ 
を使うときは1文字だけ使うよりもいくつ 
かの文字を組み合わせて使うことが多いは 
ずです。そこで C では，この文字列を char 
型の1次元配列として実現しています。具 
体的には，宣言された配列の小さな添え字 
のものから1文字ずつ格納していって，最 
後の文字を格納したあとにヌル文字 （ C で 
は‘¥ 0,と表現されます0なおこのヌル文字 
は1文字です）と呼ばれる文字を格納しま 
す。このヌル文字はここで文字列のデータ 
がおしまいだよということを示すものです。 
こうすることで文字列を格納する！：き，あ 
らかじめ配列を格納する文字列より大きめ 
に取っておきさえすれば問題なく処理が行 
えます。 

とはいえ， C は文字列処理は得意ではあ 
りません。というのは文字列の処理を行お 
うとすると，演算子などでは処理が不便な 
ので文字列処理関数を include して使用す 
るこ.とになるからです。たとえば ， name 
という配列に “ I LOVE C ： 1 という文字列を 
格納してみましよう。 
char name [20] , 
strcpy ( name , “I LOVE C .”）； 

上に出てきた strcpy という関数は文字列 
処理用の関数で，1番目の引数に文字型配 


プリプロセッサは偉大である 


—般に c 言語の処理系（この場合はコンパイ 
ラ）には，純粋にコンパイルする前にソースブ 
ログラムに手を加えてくれるプリプロセッサと 
いうものがあります。このプリプロセッサはプ 
ログラムに細かな細工を施してくれる便利なも 
のです。 

実際に C のプログラムを見てみると，先頭に 

のついた行がいくつか並んでいるのが見られ 
ると思います。これがプリプロセッサへの命令 
です。このように行の先頭に T がつくと，それ 
以降に書いたことはコンパイル時にプリプロセ 
ッサが読み取って，その内容にあわせて処理を 
行い，その‘#’のついた行を削除します。したが 
って，バーサ（構文解析部）がプログラムを読 
むときには，通常の完全な C のプログラムにな 
っているのです。 

さてプリプロセッサへの命令ですが，これら 
はマク Q 定義，ファイルの取り込み，条件つき 
コンパイルとその他に大きく分けられます。こ 
のうち頻繁に使うのがマクロ定義の define とフ 
ァイル取り込みの include です。まず define です 
が，これはソースファイル内の文字列の置き換 
えを行います。たとえば，以下のように害くと 
# define MAX 999 


そのソースファイル内の MAX という文字列が 
すべて999と書き換えられます。したがって，ま 
るで定数を宣言したかのように害くことができ 
ることになります。ほかにも単純な関数であれ 
ばあたかも，それを定義したかのように振る舞 
わせることもできます。 

そして，もう一方の include は指定したファイ 
ルの取り込みを行います。 

林 include < stdio . h > 

よくプログラムを見ると上の例のように，関 
数についての情報が書かれているインクルード 
ファイルを取り込んでいますね。上の例はブロ 
グラム中で標準 I / O 関数群を使用する場合の宣 
言です。このように C のブログラムでは，あら 
かじめ用意しておいたプログラムをライブラリ 
として使うことができます。そのおかげで我々 
は複雑なプログラムをいちいち書かずにすみま 
すし，ハードの仕様変更にもライブラリの交換 
だけで対応できるのです。 

以上のようにプリプロセッサを使うとプログ 
ラムがかなり害きやすくなります。また，プリ 
プロセッサにはこれらの例のほかにもいろいろ 
な命令があり，これを真面目に脱明しようとす 
ると本が丨冊害けるぐらい奥が深いのでした。 


図 4 文字列の格納 



列をとり，これに2番目の引数の文字列を 
格納するというものです。この処理の終 f 
したときの配列 name の状態を図4に示し 
ます。これを見ると宣言時に20個の要素が 
とられ，格納した文字列の最後にヌル文字 
(‘¥ 0 ’） があり，配列内のこれ以降のデータ 
は意味のないことを示しています。 

このように基本的に1バイトごと (char 
型変数1個ごと）に1文字（半角）を格納し 
ます。しかし日本語の使える処理系では， 
漢字などの全角文字も格納することになり 
ます。この場合，全角文字は2バイトで表 
現されるので文字型の配列要素2個に1文 
字格納されることになります。 

さて先ほどの例では文字列の値を配列に 
格納するのに， strcpy 関数を使いました。 
そこで文字列型が配列で実現されることか 
らわかると思いますが，以下のように書く 
ことはできません。 

name =“1 LOVE C .” ； 

どうしてもこのように書きたいときは次の 
ように書きます。 
char * name , 
name =“1 LOVE C . ” ； 

これはあとで説明するボインタ型を用い 
たものです。これは変数に特定の文字列（文 
字列定数）しか与えないときにはよいので 
すが，通常の文字列処理用の関数が使えな 
<なる場合があります。 

また配列を宣言するときに，要素数が最 
低でも格納する文字数+1になるように注 
意してください。1文字多いのは，エンド 
コードとしてヌル文字を格納するためです。 
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図 5 構造体の例 



さて，先の例で文字列を“”でく くってい 
ることに気づいたでしようか。そう， C で 
は文字列は“”でく くって示されます。“” 
でく くる}:，くくられた文字列の最後にヌ 
ル文字を加えたものを表します。したがっ 
て， ‘ a ’ と“ a ” では意味が異なります （‘ a ’ は 
1文字， “a” はヌル文字が加わった 2 文字 
となります)。 C では文字と文字列の区別は 
重要なので，注意してください。 

|靈 S とめて U まお5構造体 

次に構造体です。配列がある特定の型の 
変数を集めてひとつの変数にしたのに対し， 
構造体は複数の型の変数を集めてひとつの 
変数とするものです。その際，構造体の各 
要素のことをメンバといいます。そして酉己 
列では各要素を添え字で指定していました 
が，構造体では構造体宣言時に各メンバに 
メンバ名という名前をつけてあげて区別し 
ます。以下に年齢格納用のメンバ year と名 
前格納用のメンバ name を持つ構造体 ， dat 
um を宣言してみましよう。 
struct person { 

char name [20] *, 
int year ， 

} datum ; 

上の例では person といった文字が見えま 
す。これはタグと呼ばれるもので，上で宣 
言した name と year のメンバを持つ構造体の 
総称名です。これに対して， datum は pers 
on という構造体の型を持った変数の名前で 
す。このタグ名を設定することで，ある1 


種の構造体のメンバについて 
の情報を何度も書く必要がな 
くなります。このタグ名と変 
数名は両方とも必ず指定しな 
ければならないという規則は 
ありません。そこで先の例は 
以下のようにも書けます。 
struct person { 

char name [20]; 
int year , 

}; 

struct person datum •， 
ではこのように宣言された 
構造体はどのように主記憶上 
に実現されるのでしようか。 
上の例で宣言された構造体 da 
turn の場合を図5に示します。 
配列の場合と同様に，構造体 
内のメンバが連続した領域に 
複数の変数を配置したように 
なっています。当然，構造体 
の記憶容量（サイズ）は各メンバのサイズ 
の合計となっています。したがって，各メ 
ンバのサイズがわかれば簡単に構造体の大 
きさが得られます。各メンバにはその型に 
合わせてふつうの変数のように値が格納さ 
れます。 

さて各メンバに値を代入したりするとき 
は，構造体名の後ろにメンバ演算子“.”を 
つけてメンバ名を指定して使います。先ほ 
ど宣言した datum の各メンバに値を代入 
してみましよう。 

datum , year =70 , 

strcpy 、 datum . name , “Richard reyn 
man ”）； 

また，各メンバの値を參照するときも同 
様-に行えます。実際さまざまのデータを処 
理しようとすると，この構造体の 
ような複数のデータ型が集まった 
ような複維なデータが多くありま 
す。しかし，構造体だけではあま 
りおいしくありません0ところ力す 
あとで説明するボインタ型とこれ 
を組み合わせるときわめて強力で 
す。私などはこれができるという 
だけで C や PASCAL を使っている 
ようなものです （ PASCAL では re 
cord 型といっています）。 

構造体にはメンバの特別な型と 
•してビット フイ ールドというもの 
があります。これは各メンバが整 
数型で unsigned 指定された場合に 
表現でき，その表現する値の範囲 
が小さい場合に有効となるもので 


す。このようなときに各変数の記憶領域に 
おける大きさを必要最小限とすることによ 
り，従来ひとつの変数の領域としてとる場 
所に複数の変数を詰め込んでしまおうとい 
うものです。これは C によってはサポート 
されていない可能性がありますので，詳し 
い説明は省略させていただきます。 

; g なんでもしまえる共用体 

そして，最後に共用体です。これはひと 
つの変数に，複数の型を持たせてしまおう 
というものです。つまり共用体は同一の記 
憶領域に複数の変数があるようなものです c 
したがって構造体では各メンバにそれぞれ 
値を格納することができたのですが，共用 
体では常にメンバのうちのひとつだけが有 
効となります。そこで重要なことはこの共 
用体を使うとき，どの型で共用体変数に値 
を格納したか（どのメンバが有効か）をユー 
ザーが覚えておく必要があるということで 
す。最初に述べましたように変数の型の宣 
言とは，その変数の領域に格納されたビツ 
卜列をどのように解釈するかということの 
指定なのです。したがって，共用体変数に 
格納した型と異なる型で値を取り出そうと 
すれば，意味のない値を得ることになりま 
す。 

共用体の宣言の方法は構造体とまったく 
同様となっています。以下に共用体の記述 
例を示します。 
union TEL { 

int no *, 

char mess[loj , 

} Richard I 
すると構造体と同様に， 

Richard . no =1102956382 ； 


図 6 共用体のイメージ 


TEL のア ドレスー! 
(&TEL) 

TEL.no のアドレス - 
(&TE し no) 

TEL. mess の . - 

アドレス 

(&TEL. mess) 


令- 

TE し • no 奇 

(4 パイト） 




TE し. mess 

(15 バイト） 









- TE し mess[0] 
- TEL. mess[ I ] 


-TEL. mess[l4j 
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図 7 ポインタによるアクセス 
主記憶空間 


ポインタ 
変数 P の 
アドレス 
(&P) 




r. 


アドレス p 

データ （* p ) 



とか 

strcpy ( Richard . mess，“He has noi ' 
EL .”）： 

などと書けるようになります（両方一度に 
書くと，あとに書いたものだけが有効とな 
ります）。つまり，メンバ名を指定すること 
により型を指定しています。 

上の例として宣言した共用体 TEL がど 
のように主記憶空間に実現されるかを示し 
たものが図6です。これを見ればわかるよ 
うに共用体の場合，メンバの中でもっとも 
サイズが大きい型だけのサイズが共用体自 
身の記憶容量（サイズ）となります。また 
各メンバのアドレスは共用体自身のアドレ 
スとなっています。したがって，複数のメ 
ンパ、のうち常にひとつしか使えないことに 
なります。 

<どいようですが，値を取り出すとき， 
型に十分に注意して使ってください。 


くしたりすることによく使われます。 

先ほどいいましたように，通常の変数は 
その変数が記憶領域の一部を占領している 
ので，その位置すなわちアドレスを持って 
います。変数の実際にある位置の先頭アド 
レスを取り出す演算子が，です。 P をポ 
インタ変数として宣言すると， 
p = &a » 

とすることで， P には変数 a のアドレスが 
格納されます。 

C 言語を使ったことのある皆さんはおそ 
らく scanf という関数をご存じでしよう。 
この関数を使うときに，変数の前に‘&’をつ 
けて関数を呼びますね。これには変数のア 
ドレスを値として渡そうという意味があり 
ます。もし‘&’をつけなかったら， C のコン 
パイラはその変数に格納された値を関数に 
渡し，その値のアドレスに戻り値を返しま 
す。しかし実際には，その変数に値を代入 
して関数を終了してほしいのですから，こ 
こに値を代入するんだよというために変数 
のアドレスを渡しているのです。たとえる 
なら 「Oh ! X に返信用封筒つきで手紙を書 
いたら返信用封筒が STUDIO X に掲載さ 
れてしまった」ようなものです。 

C では関数はひとつの値しか返しません 
(もともと関数とはそういうものです力”。 
しかし，複数の値を返したいときがありま 
す。この場合は関数を呼ぶときに変数のア 
ドレスを渡してやり，関数内でこれをポイ 
ンタ型で受けてやればよいわけです。こう 
すると呼び出し側の変数と，呼び出された 
関数内の変数がひとつに結びつけられたよ 
うに見えます。 

このような変数の渡し方をアドレス渡し 


|| ゃっぱり，ポィンタ型は無敵だ! 

ポインタ型は，きわめて便利な変数のひ 
とつでデータ構造の話をするときには不可 
欠なものです。また，複雑なデータ構造を 
記述するときの縁の下の力持ち的な存在と 
もいえます（私は接着剤的な存在だと思い 
ます）。しかし，使い方を誤るとプログラム 
が暴走しかねませんので要注意です。 

さて，ポインタ型とは簡単にいうとアド 
レスを値として格納するための変数です0 
アドレスの話は変数の正体についての話で 
述べましたね0アドレスを値として格納で 
きるとどのような利点があるのでしようか。 
まず記憶領域の任意のアドレスの値が参照 
できるようになります。でも実際はそのよ 
うな使い方はあまりせず，変数や造体， 
共用体などを連結したり，配列を使いやす 


(call by address ) といい，一般的な，変 
数の値をコピーして関数内の変数に渡して 
あげるやり方を値渡し (call by value ) と 
いいます0ここで重要なのは アドレス 渡し 
の場合，関数内で変数の値を変更すると呼 
び出し側の変数の値も変わってしまいます 
(したがって，関数から複数の値が返せる）。 
しかし，値渡しの場合は呼び出し側の変数 
と関数内での変数は関係ないので，関数内 
で変数の値を変更しても呼び出し側に影響 
はありません。 

話がそれてしまいました力 ? ，ポインタに 
は直接任意のアドレスの値を代入すること 
もできます。たとえば， 

p = 100 ； 

といったぐあいです。この場合この100とい 
う値はアドレスを示すものと解釈されます。 
逆にポインタ変数のアドレスを取り出すこ 
ともできます。つまり， & P とすればよいわ 


けです（でもポインタ変数の実現されてい 
るアドレスがわかっても，あんまり意味が 
ありません）。 

さて次に登場する演算子は，間接演算子 
‘ * ’です。この演算子はポインタ型の変数に 
のみ有効で，その変数に格納されているア 
ドレスの値を取り出します0ここのところ 
がちょっとややこしいので，図7を見てく 
ださい。 & P はボインタ変数 P のありか（ア 
ドレス）です。ここにある値が格納されてい 
るとします。その値は P で参照されます。 
そこで* P は，この P の値をアドレス t す 
る記憶領域の値を示します。そこで問題と 
なるのが* P の値は，どんな型なのかとい 
うことです。そこで C ではポインタ変数を 
宣言するときに， * P の値を取り出した場 
合にそれをどんな型と解釈するかを指定し 
ます。以下にポインタ変数の宣言の例を示 
します。 

int * p ; 

変数名の前に‘*’がつくとそれがポインタ 
変数であることを示し，上の例は， * P の 
値を int 型とすることを意味します。そこ 
で，次のように書いたとします。 
int a ，* P ; 

P=&a : 

氺 P =5 ; 

すると P は変数 a のア ドレスを 示すため， 
a の値が5になりこれは次の1文と等価です。 
a = 5 ; 

これは，えらくまわりくどい例で，このよ 
うなことはあまりしません。しかしポイン 
夕変数のイメージはわかってもらえた！:思、 
います。 

そもそもポインタとは日本語でいう矢印 
のことです0つまりポインタ変数はアドレ 
スを値として格納することにより，主記憶 
領域の一部分を指し示しているわけです。 

このポインタ型を使うときに注意してほ 
しいことがあります。それはポインタ型の 
変数を使うときは必ず初期化をして使うと 
いうことです。たとえば，以下の例を見て 
ください。 
int * p ! 

氺 p = 0 I 

このようなプログラムは非常に危険です。 
というのは，ポインタ変数 P の値（アドレ 
ス）がわからないということです。したが 
って記憶領域のたまたま P で示されたアド 
レスに値を書き込んでいるわけで，そこが 
なにか別のプログラムに使われていたり， 

ましてや自分自身のプログラムだったりす 
ると暴走や異常動作の原因になります。 

それから， C においてはすべての文字列 
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はポインタ型であるということです。文字 
の配列のところで一度説明しましたが，た 
とえばプログラム内に‘‘ I LOVE C .” とい 
う文字列があったとします。すると，コン 
パイルされた結果得られるオブジェクトプ 
ログラム内には，この文字列がそのまま格 
納されています。したがって，この文字列 
のアドレスを使えば文字列処理用の関数の 
手を借りなくてもすみ，以下のように書け 
ます。 

char * mess ， 
mess = “ Message .’ ； 
printf (“ ％ s ¥ n ”， mess ); 

これは，決まった文字列（文字列定数） 
のときしか使えませんが，同じ文字列を何 
回も書かずにすみます。 

ポインタ型と構造データ型 
の不思議な関係 

今までの説明でボインタ型がなんとなく 
わかっていただけたでしようか，しかしポ 
インタ型のおいしさは，配列や構造体など 
と組み合わせて使うときに生きてきます。 
そこで，ポインタ型と配列の関係について 
見てみましよう。 

配列の各要素を参照するときは，添え字 
を用いるのが一般的ですが，ポインタ型を 
用いてもできます。まず，以下のように配 
列とポインタ変数を準備したとします。 
int a [20]， * p，i ; 

p ~ » 

すると配列 a の要素を参照するには a [ i ] 

と書く方法と， *(p + i ) と書く方法があり， 
これらの書き方はまったく同じことを意味 
します。つまりボインタ変数に1を加える 
ということはその要素の型分だけアドレス 
を増やすことになり，したがって配列の次 
の要素を示すようになります。これは1を 
加えるときだけでなく，ほかの値を加える 
ときも差し引くときも同様に行えます。ふ 
つうはこの配列 a の20個の要素を値の合 
計を得るためには，以下のように書きます。 
int total 
total =0 I 

for ( i =0; i <20 ;i + +) 

total=total + a [ i ] •， 

しかしこれはポインタ変数を川いて，以 
下のようにも齊•けます。 
int total’n ， 
total = 0 ; 
n = 20 ) 

while ( - n >0) total + = * (p + + ); 

実は，配列の [] の括弧も演算子で，計算 
機内部でも M じようなことをして処理をし 


ています。 

さて大事なことは， C では変数(基本デー 
夕型）は常に2つの値を持っているという 
ことです。つまりひとつは変数に格納され 
た値で，もうひとつは変数の実現されてい 
るアドレスです0ふつう変数から値を取り 
出そうと変数の名前を書くと，変数に格納 
されている値が取り出されます。これに対 
して変数にアドレス演算子‘&’をつけるこ 
とでアドレスを値として取り出すことがで 
きます。このことについては♦までの話で 
わかってもらえたと思います。 

それでは構造データ型のものはどうなっ 
ているのでしようか。少なくとも配列はポ 
インタ型であると考えられます。つまり配 
列の名前はその配列の格納されている先頭 
アドレスを示しています0そのアドレスに 
それに対して [] の括弧を使った演算子が 
ついて，先頭アドレスからのずれを配列要 
素のサイズと [] でくくられた数から算出 
し，求めるアドレスを得て，それに対して 
処理を行っているのです。つまり，以下の 
2つの宣言文は 「 n ] じことを意味します。 
int * p *. 
int p [ ] *. 


いきなりだが， C は言語だったりするのです。 
したがって生きています。そうトンボだって， 

ミミズだって，乳酸菌だって生きているのです。 
ですから生きている限りは進化するのが人情と 
いうものだったりするのでした。そこで， C 言 
語も徐々にではあるが進化しているんだよとい 
うわけです。しかし c 言語だって初めからこの 
ような姿であったわけではないのです。有名な 
話ですが，もともと BCPL という言語があって， 

これが進化して B となり現在の C が 生まれたと 
いうルーツが あり ます。 

C はあの有名な K & R (カーニハンとリ ッチー の 
書いた「プログラミング言語 C 」 という本）で定 
義されていて，これにはずれるものが C と名乗 
ることは難しいのです。ただし， C の機能を少 
し削って実現したサブセットというのはありま 
す 。 BDS C を始め，8ビット用の C の多くはサブ 
セットです UC は BDS C のさらにサブセット）。 

そして K & R が出たあと， C はデータ型を増 
やしたり （ void 型や enum 型が有名），関数の増強 
をはかったりしながら変化していきました。そ 
して現在， C は変革の時期にあります。もとも 
と C の移植性がよいという伝説は， C が UNIX 
の標準言語であり （ UNIX にはひとつの C しか 
ない），マシンが違っても UNIX 上ではわずかな 
変更だけで同じものが動作することからきてい 
ました。ところが UNIX 以外の処理系でも C が 
広く使われるようになり，いわゆる 「 UNIX の 
C 」 以外の C が多くなったのです。もともと K 
& R で C のすべてが定義されているわけではあ 


このような書き方は C では比較的よ〈行 
われます（特に文字列処理の場合）ので， 
できるだけ惯れてお〈のが好ましいでしよ 
う。逆にいえば，このような書き方が簡単 
に言売めるようになると C については十分 
に 使える レベルに 達したといえるのではな 
いかと思います。ただし，このような書き 
方をするとき注意しなければならないこと 
があります。それは演算子の優先順位です。 
これが自分の組んだプログラムとかみあっ 
ていないと，予想外の結果が得られること 
となります。おかしいなと思ったらこの辺 
を疑ってください。なお，優先順位を（強 
引に）変える方法は （） でく くってやること 
ぐらいしかありません。 

それでは，構造体とポインタ変数の関係 
へと話を進めましょう。構造体の場合は配 
列の場合と異なり，配列のように表現を変 
えるといったものではなく，構造体同士ま 
たは構造体と変数の連結を行いデータ構造 
を形成するためのものです。具体的には， 
ポインタメンノぐ演算子‘一>，を使用します0 
以下に，構造体のところで宣言した構造体 
タグ person を用いた例を挙げましょう。 
struct person datum ； 


りません。細かな部分や曖昧な部分は，実際の 
処理系移植者の判断に委ねられているのです。 
そうして K & R の解釈の違いから，いろいろな 
C が現れ分化し始めました。 

そこで「標準的な C を決めよう」ということ 
でプログラミング言語の統一化をはかっている 
ANSI (アメリカ規格協会）が乗り出しました。 
これが， ANSI の標準化案 （ ANSI 仕様）であり， 
関数使用の際にパラメータの型をチェックす 
ることにしたり，構造体同士の代入や関数が構 
造体を値として返すことなどを可能とすること 
を盛り込んでいます。お気づきの方も多いと思 
いますが ， XC (というよりも MS C ) はこの A 
NSI の標準化案を取り入れています。現在，多 
くの C がこの仕様に準拠するための拡張をはか 
っているところです。 

そして，もうひとつの傾向がオブジェクト指 
向との融合です。これが ， C + + という言語で 
す。 C 自体が優れた言語だっただけに，この 
C + +は次世代言語としてかなリ期待されてい 
ます。言語とはいっても，実際にはこの C + + 
は一種のプリプロセッサのようなもので， 

C + + で害かれたプログラムは C のプログラム 
に変換され，それを C でコンパイルし実行しま 
す0したがって， C の動く環境ではたいがい 
C + + を使うことができるでしょう。このあた 
りは C と同様に実用重視の設計となっています 
(もっとも，数行のプログラムをコンパイルした 
ら数十 K バイトのオブジェクトを出したとかい 
う話もありますが)。 
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struct person * data i 

data = &datum ; 

data —> year =70; 

strcpy(data — > name ，“ Richard ”）； 

と書くことで，従来のように処理ができま 
す。つまり， 

datum . year =70 , 
strcpy ( datum . name ，“ Richard ”） ； 

と同じことをしていることになります。実 
は，ポインタメンバ演算子を用いずに書く 
こともでき，それは以下のようになります。 
(* data ). year =70 ; 
strcpy “ポ data ). name ,“ Richard ”） ； 
要するに，この書き方はポインタメンバ演 
算子と等価といえます。 

このポインタメンバ演算子とボインタを 
用いると，構造体を組み合わせて新しいデ 
—夕構造ができることを意味します。この 
ことは非常に重要です。 

しかしこのポインタメンバ演算子を用い 
ても構造体は配列のように，ポインタでも 
同様に処理ができるかというとそうではあ 
りません。先ほど配列はポインタであるこ 
とを述べました。しかしその特性からいう 
と，構造体はどちらかといえば配列よりも 
変数に近いようです。厳密にいうと，変数 
に近づきつつあるというのが正しいでしよ 
う。 C が生まれた頃は，構造体の使用は処理 
速度の低下を招くため，配列のような取り 
扱いを行っていました（現在でも多くのパ 
ソコンの C はやっています）。しかしこれ 
からの C は ANSI 標準化案に対応してい 
〈過程で拡張され，これにともない構造体 
は変数のような特性を帯びていくものと思 
われます。事実 XC は ANSI 標準化案に準 
拠しており，このためほかの C より構造体 
がかなり使いやすくなっています。 

秘奥義記憶クラス 

今までの話は変数やデータ型の特性につ 
いてのものであるのに対して，記憶クラス 
は C の処理系にどのように変数を生成する 
のかということを指定するものです。この 
変数の生成方法を指定するということは， 
変数の特性の大部分を指定することともい 
えます。実際には C には自動変数，静的変 
数，外部変数，レジスタ変数があります0 
では，これらについてひとつずつ見ていき 
たいと思います。しかし，ここのところはか 
なり難しいので，理解できない人も多いと 
思います。そのような人は以下を読み飛ば 
してもかまいません。しかし，わからない 
からといって C が使えないわけではありま 


せんから，あせらず 図8 
に勉強してください。 

自動変数は C では 
もっとも一般的な変 
数であって変数宣言 
時（関数宣言内）に 
なにも指定しないと， 

この自動変数になり 
ます。以下に宣言の 
例を挙げます。 
autoint a , 
float b ； 

この変数は宣言さ 
れたときにスタック 


構造体タグデータ 


構造体タグデータ 
(抽象モデル） 



2 構造体タグデータ 
(メモリイメージ） 



int 型のサイズが4バイトのとき 


に生成され，宣言文 
のすぐ前の‘ I ’に対 

応する ‘I ’のところまでが有効範囲で，‘| ’ 
のところでその変数は消滅します。また， 
生成されたときにすでに同名の変数が存在 
したときは，その変数より優先します。以 
下に例を示します。 


ときは0で初期化されます。またプロダラ 
ムの最初のところで記憶クラスをす旨定せず 
に変数を宣言すると静的変数になります（自 
動変数としても変数の有効範囲がプロダラ 
ム全域で，1回しか初期化されないので静 


maim ) 


的変数とほぼ同一となります）。 


また C では関数は別々にコンパイルが可 


auto int a ， 

{ 

float b ; 

{ 

int a ! 
a —1 i 


> 

いちばん最後に宣言された整数変数 a は， 
その前後の括弧 {} 内で有効で，1はこの 
変数に代入されます。このように自動変数 
は，自分の寿命が最小になるように生成さ 
れ，消滅します0これは，モジュール化な 
どをやりやすくし，プログラムの安全 Hi を 
高めるためです。 

次に静的変数ですが，この変数はプログ 
ラムが実行される際に生成されプログラム 
が終了するときに消滅します。しかし，プ 
ログラムの最初に宣言したとき（外部的静 
的変数）と，関数内で宣言したとき（内部 
的静的変数）で働きが異なります。この外 
部的静的変数は，宣言を行ったソースプロ 
グラム フアイル 内の すべての 領域から参照 
代入ができます。これに対し内部的静的変 
数は，その宣言をした関数内でしか参照代 
入ができません。以下に変数の宣言の例を 
示します。 


能であり， ソースファイルが 複数になるこ 
とがあります。このようなときに変数をソ 
ースファイ ルの最初のところ（厳密には関 
数外ならよい）で，静的変数宣言をすると 
ほかのソー スファイ ルからその変数の 参照 
はできません。このことは変数だとあまり 
意味がありません力 5 ',関数を静的に宣言す 
ることでほかの ソースファイ ル内からの呼 
び出しを禁じることができ，プログラムの 
安全性を向上させることができます。 

静的変数は同ーソースファイル内の複数 
の関数間で同一変数の参照を可能にしたも 
のでした。しかし外部変数は複数のソース 
ファイル間の同一変数の参照を可能としま 
す。具体的にはいちばん最初にこの変数が 
宣言されたときに変数の生成を行い（これ 
は静的変数となります），それ以降に宣言さ 
れたとき （ extern 宣言を行う）は同一の変 
数となるようにします。以下に例を示しま 
す 。 

int com , 

maim ) 


} 

extern int com , 
sub () 


static int a i 


さて，この静的変数は生成時に初期化が } 

一度だけ行われ，初期化の値を指定しない この中の変数 com は2つの関数でバラ 
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バラに作成されていますが（同時にコンパ 
イルされていなければならない），実際には 
同一変数となります。 

最後にレジスタ変数ですが，これは変数 
をレジスタにとることで，処理の高速化を 
行おうというものです。しかし， CPU の持 
ちあわせるレジスタの個数は有限なので， 
やたらとレジスタ変数にしたからプログラ 
ムが速くなるかというとそうではありませ 
ん。優れた C の処理系（コンパイラ）にな 
ると，レジスタ変数で宣言しなくてもプロ 
グラムの高速化をはかるために頻繁に使う 
変数は自動的にレジスタ変数にするものも 
あります0このような処理系の場合，レジ 
スタ変数の宣言をしてもレジ:^ f に変数を 
生成してくれないものもあります。以下に 
レジスタ変数の宣言例を示します。 

register int a ， 

このように記憶クラスを使うと変数の特 
性を変えたり，複数の人数でのプログラム 
の開発をやりやすくしたりすることができ 
ます。しかし，変数などがどのように実現 
されているかということをよ〈知っていな 
いと，これを使いこなすことはできません。 
このことは結構 レベルの 高い テクニックで 
すので，最初のうちはあまり必要でないで 
しよう。しかし，大きなプログラムを作成 
しようとするときなどには大いに役に立つ 
ものと思います。 

縁起もののサンプルプログラム 

話はここで終わってもよかったのですが， 
この手の話にはサンプルプログラムが縁起 
ものなので，構造体とポインタを組み合わ 
せたデータ構造を用いたプログラムをリス 
卜1に示します。このプログラムはかの有 
名な C のバイブルともいうべき K&R (『プ 
ログラミング言語 C 』） という本の中のプロ 
グラムを手本に書いたもので.す（なんで書 
き直したかというと，ここのテーマがデー 
夕構造なのでそれ以外のプロダラミング要 
素を省くためです）。それでこのプログラム 
は入力された文字列を内部に蓄えておいて， 
文字列ごとの出現回数を表示します。はっ 
きりいってあんまり意味のないプログラム 
です。 

さてこのプログラムで使われているデー 
夕構造は，二進木 （binary tree ) と呼ばれ 
る有名なものです。リスト1の構造体タグ 
data を宣言しているところを見てください。 
これが二進木の構成要素です。これのイメ 
ージを図 8-1 に示します（この図は今までの 
メモリイメージのものとは異なります）。ま 


た，メモリイメージで書くと図 8-2 のように 
なります。いうまでもなく矢印はポインタ 
を示しており，二進木の特徴は要素のボイ 
ンタが右と左の2方向を同時にす旨している 
ということにあります。これからはいちい 
ちメモリイメージで書くと面倒なので，図 
8-1 のような抽象的なモデルで考えます0実 
はここがデータ構造のしっかりした言語の 
おいしいところのひとつで，いつもメモリ 
イメージで考えていたのでは，面倒臭くて 


頭がこんがらかってしまいます。しかしこ 
のような抽象的なモデルでデータ構造を表 
現できればさほど難しくありません。この 
ように抽象的にデータをとらえられたこと 
は，あのオブジェクト指向などでかなり重 
視されています（その点からいうと C のデ 
ータ構造は，あまりおいし〈ないような気 
がします。 C のデータ構造がおいしいとい 
うのはあくまでも BASIC などの言語に比 
ベてだったりするのでした）。 


リスト1二進木のサンプル 


/* 


二進木によるサンブルブログラム */ 


# include <stdio.h> 
finclude <stdlib.h> 

#include <stnng. h> 

#define STRLEN 50 
#define TRUE 1 

struct data { 

struct data 拿 right; 
char string tSTRLEN1 ； 
int count ； 
struct data *left; 


static struct data *root ； 
main() 


char input[STRLEN]; 
struct data *inaert ()； 


/* 初期設定 */ 


root = NULL ； 

p r i n tf ("¥ n これは、二遒木によるサンブルブログラムです。 ¥ n " > ； 
printf (" 数えたいものの名前をいれてください。 ¥ n ")； 

/* メイン 処理*/ 

while (TRUE) { 

printfr •名前を入力してください。 
scanf( "Xb" ， input) ; 
root = insert ^ root,input); 
search(root); 

) 

) 

/* 木のデータを探索し、すでにあればカウントを增やし、無ければ付け加える。 */ 

struct data * 
insert(p,input) 
struct data *p; 
char 拿 input; 

{ 

int flag ； 

if (p != NULL) { 

if ((flag = 8trcmpi(p->string,input)) == 0 ) ++p->count ； 
else if {flag > 0) p->right = insert(p->right,input )； 
else if (flag < 0) p->left = insert(p->left ,input}; 


else 


if ((p = (struct data *)raalloc(sizeof(struct data))) 
fprintfUtderr," メモリが不足しました。 ¥n M )； 
exit(); 

} 

strcpy(p->8tring,input )； 
p->count =1; 

p->right = p->left = NULL; 


NULL) 


return(p); 


/* 木のデータを小さい順に表示する 。*/ 

search(p) 
struct data *p ； 

{ 

if (p != NULL) { 

search(p->left )； 

printf (”％ s : %d¥n",p->string,p->count )； 
search(p->right )； 
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二進木の要素のイメージがわかったとこ 
ろで，二進木そのものについて考えてみま 
しよう。実は二進木は先ほどの要素を組み 
合わせて構成されます。まずは，図9を見 
てください。各要素のポインタがほかの要 
素を指し示すことによって，各要素が連結 
し，ひとつの構造を形作っています。この 
ようなデータ構造を総称して木 （ tree ) と 
いいます。この木のいちばん初めの頭とな 
るもの（厳密にいうとほかのいかなる要素 
からも指し示されない要素）を根 ( root ) 
といいます。また，逆にいちばん下の最後 
についている要素（やっぱり厳密にいうと 
ほかのいかなる要素も指し示さない要素） 

を葉 ( leaf ) といいます。 

ここで気づいてほしいことは，複雑そう 
なデータ構造も実はそれほど複雑でないと 
いうことです。この木がきわめて単純な構 
造をしていることは一目瞭然だと思います。 
一般にデータ構造の多くは，この木のよう 
な単純なモデルの組み合わせとなっていま 
す。それはシンプルな構造でデータを扱う 
ほうが効率がよいという現実の結果がある 
ためです（しかしシンプルすぎるのもいけ 
ないし，複雑すぎるのもいけない）。したが 
ってデータ構造というものは，そんなに難 
しいものではありません。 

さて，話を二進木に戻しましよう。では， 
どうしてこの二進木が優れているのでしよ 
うか。それは一般にデータの構造が， デー 
夕同士の関係を表現するためです。この二 
進木の場合，図10のような関係が成り立つ 
ようにデータを格納します。つまりある要 
素から見て，を:側の要素に格納された値は 
すべて自分の値より小さく，右側の要素は 
すべて自分より大きな値の要素です。した 
がってある値が木の中にあるかどうか知り 
たいときは，まず根の値を取り出し値の比 
敉をします。すると，その結果によって調 
ベたい値が右にあるのか左にあるのかがわ 
かります。そこで探したい値があると思わ 


れる方向の要素の値を取り出します。この 
動作を繰り返していけば，調べたい値を簡 
単に見つけることができます。この様子を 
図11に示しました。詳しくは，リスト1の 
insert 関数を見てください。 

このような探索を単純に配列でやると， 
ある値があるかどうかを調べるのに，蓄え 
られたデータの半分ぐ.らいの数の比較冋数 
が必要ですし，最初に宣言しただけのデー 
夕しか格納できません。しかし，この二進 
木では配列よりは比較 N 数は少ないし，あ 
とで述べる動的なデータ構造を使っている 
ので配列のときよりは使いやすくなってい 
ます。 

insert 関数の中に malloc という関数が 
使われています。この関数は指定したバイ 
卜数だけのメモリを主記憶上の未使用領域 
に確保し（したがってほかの プログラムへ 
の影響はほとんどない），そのアドレスを返 
します。これをポインタ変数に指し示して 
おく ことで， ユーザーは 自由に変数を生成 
することができます。 

このようにプログラムの実行中に変数を 
生成させたり，消滅させたりすることので 
きるデータ構造を動的なデータ構造と いい 
ます。実は C の おいし さは，この動的なデ 
ータ構造にあるといえます。実際 C では構 
造体はデータを格納するための器であり， 
ポインタはそれをくっつける糊であり，関 
数 malloc は箱を切り取ってくる‘はさみ， 
のようなものです。 

したがって，これらをどううまく使うか 
というのが大事なのです。もっといえば， 

C では構造体とポインタと malloc 閲数の三 
位一体の攻撃（う一ん，懷かしい言葉だ。 
読者にこの言葉から バレーボール を連想で 
きる人がどれだけいるだろうか）こそが，お 
いしかったりするのです。このおいしさは 
とてもひと口では語りつくせない，まるで 
舌の上でとろけるような，それでいてコク 
があって……そう，なんとか雄山が腰を抜 


かし，ミスター味っ子が 
立ち直れな〈なるような， 
うまさだったりするので 
した。そのことから考え 
ると構造体やポインタな 
どは，それ単体だけでは 
ちっともおいしくないし， 
共用体や記憶クラスなど 
はこの三位一体の攻幣と 
比べれば……です。いつ 
の間にか力説してしまい 
ましたが'，このことはき 
わめて重要です。したが 
って，これらのデータ構造は ユーザーの 使 
い方次第では恐ろしいまでの力を発揮しま 
す。大事なことはこれらをどのように組み 
合わせて，いかに効率のよい エレガントな 
データ構造を作りあげていくかということ 
であろうと私は思います。 

最後にサンプルプログラム内で使われて 
いる関数が再帰的になっている点にも注意 
してほしいなと思います。ここで使った二 
進木などは自己再帰型と呼ばれるデータ構 
造です。これは二進木の格好を見ればわか 
ると思いますが，これはデータ構造が自分 
自身を組み合わせて構成される一種のフラ 
クタル的構造となっているためです。この 
ようなデータ構造について処理をする場合， 
再帰的プログラミングで処理を行います。 
これに対し配列などで処理をする場合には， 
ループで 処理をすることになります。で， 
やっぱり再帰的な処理ができるということ 
も重要なのでした。私にいわせれば再帰が 
できない C 言語なんて，大リーグボニルの 
投げられない星飛雄馬のようなものです。 
その心は，速いだけでとりえがない。おあ 
とがよろしいようで（う一ん，いまひとつ 
だな）。 

最後に 

C は低水準な処理ができる言語であるに 
もかかわらず，きわめて複雑なデータ構造 
をサポートした言語です。したがってその 
プログラムの 柔軟性は，ほかの言語には 類 
を見ないものです。逆にいえば，データ構 
造を十分に利用した プログラム を書けるこ 
とは， C を使いこなせるということの条件 
であると思います。また C の善し悪しにか 
かわらず，データ構造は プログラミング テ 
クニックのひとつの要素です。これを修得 
することは，きわめて重要なことであると 
思います。それだけに，あせらず地道に勉 
強していきましよう。 
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言語を学ぶ際に重要なことは，文法や書式 
にとらわれることなく，その言語の本質を 
つかむことです0 C 言語の場合，もっとも 
大事なものはデータ構造の理解でしょう。 
複雑だからと構造体やポインタを避けて通 
ることはできません。 BASIC が初心者のた 
めに作られた言語なら C 言語はプロのため 
に作られた言語です 0 表面だけをなでるの 
ではなく，一歩先まで踏み込まないと奥の 
深さを知ることはできないのです。 

以下に挙げられたサンプルプログラムは初 
心者用としては少し難しいものかもしれま 
せん。しかし，どんな言語でも実践を抜き 
にして会得することはできませんし， C 言 
語をマスターしようとするなら，こういっ 


正しい迷宮建築とは 

人間は昔から迷路というものに不思議な 
力があると思っていたようです。ギリシャ 
神話では，怪物ミノタウロスが棲む迷宮あ 
たりが有名だし，世界のあちこちに迷路や 
それに似たものが残されています。 

现在も迷路と呼ばれるものは世の中にた 
<さんあります。迷路の本はいうに及ばず， 
雑誌などのちょっとしたクイズ欄でもちょ 
くちょく見かけます。最近では実際に人が 
入れるでっかい迷路もいくつか登場してき 
ましたね。こういうものが出てきたことと， 
パソコン界の「迷宮」—— RPG の必須アイ 
テムと いってもいいでしようか——の ブー 
ムと になんらかのつながりが あ ることは否 
定できません。呪代人の迷路好きと昨今の 
RPG ブームの 間にはなにか関係でもあるの 
でしょうか。 

話を戻しますが，现在（少し前まで，と 
いったほうが正確でしよう力す）の パソコン 
界は「迷宮」であふれかえっています。し 


た レベルの プログラムが読めるようになら 
ないと話にならないともいえます。 

すでに特集の第丨部で基本的な概念につい 
ての理解が得られていると思います。その 
知識をもとにして，これからは ソースプロ 
グラムがすなわち解説だと思ってください。 
プログ ラムにはできるだけ多くの注釈を加 
え，機種に依存するようなものは一切排除 
し，さらに標準的なものならば，もっとも 
低機能な C 言語にも対応するように配慮さ 
れています。 

C 言語をお持ちの方なら，入力，そして改 
造などの順を追っていくのもよいでしょう。 
できれば C 言語をお持ちでない方もこの機 
会に C の考え方に触れてみてください。 


かしその大部分は，とても正しい迷路とは 
いえません。というのも，僕のいう正しい 
迷路とは，基本的に， 

1) ひとつながりの壁でできている。 

2) 「右手法」で脱出が可能。 

3) 壁がランダムに配置されている。 

というものだからです。「右手法」とは， 
読んで字のごとく，出発点からずっと右手 
(別に左手でも足でも構わないのですが)で 
駭•をたどっていく方法のことです。この方 
法では，いつかは必ず出口にたどりつけま 
すが，かなり無駄な回り道をすることもあ 
ります。 

先ほど，「基本的に」といったのは，た 
とえば解く者のウラをかきたい（図1を見 
てください），とか面白い形の迷路を作り 
たいとかいった場合にはこの原則を多少崩 
してもいいと思うからです。そういうわけ 
ですから，コンピュータ RPG の迷宮は「迷 
路としては」正しくないといいました力 ? ， 
決してダメだといっているわけではありま 
せん。もし，そうした「正しい」迷路が何 
階もあって，その中に怪物がウヨウヨいる 


状態を想像してみてください。こんな迷宮 
に誰が入りたいと思うでしようか（「それで 
も俺は入りたい！」っていう人がどこかに 
いそうな気がしますね)。 

壁を作る竜 

さて，この「正しい」迷路は，总外にも 
コンピュータを使えば簡単に実视します。 
単純な规則に従って単調な手順を繰り返せ 
ばよいからです。 RPG の迷宮などは，その 
構造に決まった规則がないせいで，コンビ 
ュータが自動的に作成することはできず， 

人問が適当な ツールを 使って手作業で作る 
ことになります（そこには作る人の個性が 
ある程度現れます。だから，できる迷宮が 
面 ft 〈なる（こともある），といえるのです 
が)〇 

で，正しい迷路の作り方の規則を紹介し 
ようと思いますが， RPG の話が出たことだ 
し，ここで1匹の竜にご登場を願うことに 
しましよう。この竜の行動パターンは簡単 
です。 

1) 1歩進むと向きを変えようとする。 

2) しかし決して自分の体にはかみつかな 
いし，自分の体を乗り越えもしない。 

3) №1体は歩くにつれて伸びていく （昔そ 
ういう ゲームが ありましたねえ >〇 

4) 壁にぶつかると，石と化してしまう（つ 
まり壁の一部となる)。 

変なたとえで申しわけありませんが，規 
則 4) あたり，かなり RPG がかっているし 
(迷宮を作るためだけに作り出されたドラ 
図1 右手法の盲点 



迷宮入りの綱乍り 

C 言語の実践編の一番手には C ビギナーの代表として丹氏の登場です。 
正しい迷路のあり方と C 言語による記述に挑んでもらいました。 XC で 
記述されていますが，基本的にどの C でも動作するはずです。 
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ゴンは，用済みになると石にされてしまう 
のでした！），少しは親しみを持っていた 
だけたのではないかと思います。 

ところで，ここで疑問を感じた方がいる 
かもしれません。図2のようになったら， 
この竜はどうするのでしようか。規則 2) が 
あるために，もはや行き場はありません。 
かといって，壁にぶつかって死ぬこともで 
きないのです。 

ここでこの竜に新しい力を与えてやるこ 
とにしましよう。 

5) 行き場がなくなれば，自分の胴体の好 

きな場所から頭を新しく出して歩き続け 

られる。 

図3を見て〈ださい。ちょっと気持ち悪 
いのです力 ? ，これで壁にぶつかるまで心お 
きなく歩くことができるわけです。 

これで僕が竜を引き合いに出して説明し 
た理由がおわかりでしょう。これがたとえ 
ば蛇だと，頭がどこからでも出せるなんて 
芸当はできやしません（竜だったらできる 
というわけでもないでしようけど)。 

実際に迷路を作るときには，枠を作って， 
その中に竜の歩幅と同じ間隔で竜の卵を置 
きます。その卵から順番に竜がかえって歩 
き回り，壁を作っていくことになるのです 
が，歩いているうちにほかの卵は竜の胴体 
の下敷きになってしまいます。こうなった 
卵は，石の中にいる （！） ので，かえるこ 
とができないのです（図4)。もしくは，竜 
図2 いきづまり 



図3 解決法 



は卵を食べながら歩き回ると考えれば（竜 
の通ったあとには初めから卵がないわけで 
すから），それでもいいのですが。どちらに 
しても，壁の中から竜が歩き始めることは 
ありません。 

これだけ知っていれば，紙と隹&筆だけで， 
どんな大きな迷路だつて作れます。 


道を掘 


る竜 


さて，迷路を作るには，もうひとつの方 
法があります。また別の竜に登場してもら 
いましょう。今度は，石がつまった建物を 
用意して，その中に竜を放つのです。つま 
り，この竜は，石の中でないと生きていけ 


ないのです。石の中をでたらめに掘り進む 
だけが商売なのです。そして空気に触れた 
ときに，あとかたもなく消えてしまうので 
す。あとの行動パターンは同じです。ただ 
し，枠から外に出ることはできません。要 
するに，前の竜は壁を作りましたが，今度 
の竜は道を作るのです。 

卵を置く場所は少し違います（図5)。そ 
れに，入り口を1力所ちやん t 開けておか 
ないと，この竜は空気に触れない限り死ね 
ないので，歩き回るうちに迷路いっぱいに 
なってしまい，動けなくなります（図6)。 
この段階で，道はすでにできあがっている 
のですが，竜が死にきれないために，迷路 
が完成しないのです。 

ところで，この方法を使えばもう少し面 
白いことができるのです。今までの竜は前 


進と左折または右折しかできませんでした 


が',さらに上または下に動けるようにして 
やるのです。するとどうなるでしよう。立 
体迷路，つまり2階建て，3階建ての迷路 
ができあがるのです。といっても， RPG に 
出てくるような何階建てという迷宮よりも 
はるかに難しいものです。上や下に行く階 
段が，いたるところにあるようなものです 
から。ただし RPG の迷宮には，魔法がかか 
つているために解けないというものが多い 


図4 石の中にいる 



図5 卵を置く場所 



図6 竜が死にきれない 



ので，いくら立体迷路力 5 '難しいといっても， 
ただ複雑だから難しいというだけです。 

なお，立体迷路は道を掘り抜く竜にしか 
作れません。壁を作る竜が同じことをやっ 
ても，おそら〈迷路の形にならないと思い 
ます。 

迷路を解く竜 

作った迷路は解かれねばなりません。そ 
こで解き方を。平面の迷路だったら右手法 
力 ? 早いでしよう。きれいな答え（余分な回 
り道のないもの）がほしければ，右手法と 
左手法で別々に解いて，両方の道が重なっ 
たところを取り出せば1本道の答えが得ら 
れます。しかし，立体迷路には右手法は通 
用しません。そこで，ここではどの方法で 
作った迷路にも使えるやり方を紹介してお 
きましよう。第3の竜が登場します。この 
竜は少し変わっています（今までのだって 
変わっていましたが)。 

1) 行き止まりに置かれた卵から生まれる。 

2) 1本道しか通れない。例によって体を 
伸ばしながら歩く。 

3) 分かれ道に〈ると死んでしまう。死骸 
はその場に残る。 

4) これを繰り返すと，最後には道が1本 
だけ残る。これが答え。 

図7に考え方を示しておきます。 
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実践編ざあプログラ5ング 


少し話が長くなってしまいましたが，こ 
れらを C でプログラムしてみましよう。ど 
の C でも基本は同じことですが，ここでは 
XC を使っています。 

リスト1は壁をのばす竜のプログラム m 
azel . c です。特に変わったことはしていま 
せん。ヘッダ（要するに main () の前）が 
ムヤミと長いので， BASIC あがりのプロ 
グラマには多少うっとうしく感じられるか 


に困るのです。このような目的には構造体 
はうってつけです（似たような例に複素数 
があります。 C のライブラリでは，複素数 
を構造体を使って定義していますが，メン 
バは同じ実数型変数2つだけです)。 

少しうっとうしい話になってしまいまし 
たが，わざわざこう定義したメリットがど 
ういうところに現れているか見てみましよ 
う0まず，プログラムの主要部分から x と 
か y とかいった座標変数が消えています。 
ベクトルは，座標をひとまとめにして数と 
同じように扱えるようにするためのもので 


もしれません力 ? ，おまじないだと思って 
打ち込んでください。 

プリプロセッサは，うまく使えば「ちよ 
っとここを変えたいな」などというときは 
極楽です。たとえば17行目の， 

# define wall ’口’ 

というところです。これは壁のキャラクタ 
ですが，ほかのキャラクタにしたいならこ 
こを変えるだけですみます。リストの中を 
探し回る必要はありません。 

あと， BASIC あがりの人が陥りやすいミ 
スは，演算子だとか，カッコ（制御構造の 
{ } や，配列の添字の [] など）の数の間違 


すから， x や y を別々に処理することなく 
プログラムが書けるのです。もっとも，ベ 
クトル自体の演算などの低レベルな処理で 
は座標変数も心要ですが。 

ところで，どうして z などというものが 
あるのでしようか0実は，ここに ベクトル 
を採用した最大のメリットがあるのです。 
いったん ベクトルに すると， 2次元だろう 
が3次元だろうが （4 次元だってできます 
が，そうなるともはや人間には解けません。 
仮に作ったとして， z の次の座標は t , つま 
り時間なのでしようか。刻々と形を変える 
迷路なんてあったら面白いでしよう力 ? ，僕 


いだとかいったものですが，これらはすべ 
て コンパイ ラのほうで エラーを 出してくれ 
ます。 C で本当に恐ろしいのは， コンパイ 
■ラにひっかからない エラー （こういうのは 
「バグ」というのでしようが，なかには 「エ 
ラー」 として コンパイラに 検出してほしい 
ものもあります）で，ここで BASIC あが 
りは挫折し， BASIC の面伊1見のよさ，その 
ありがたみを知ることになるのです。まあ， 
脅かしていないで先に進みましよう。 


構造体を使う 


リスト2は道を掘る竜のプログラム maz 
e 2. c ですが， mazel . c と少し違います〇 C 
は変数の型の定義ができますので ， veci 
(ベクトル）という型を，構造体を使っ 
定義しています （23 行)。 

XC のリフアレンスマニュアルによると， 

構造体は，「“型の異なる”複数の変数の 
集合をひとつのデータ単位として扱うもの」 
となっています。この vector という型は， 
座標をひとまとめにして扱うために作った 
もので，メンバも“同じ型の”整数3つだ 
けです。事実，この程度なら配列！：ポイン 
夕をうまく使えば構造体など要らないとも 
いえるのですが，ベクトルというものの性 
質上，これをさらに配列にしたり，代入し 
たりといったことが簡単にできないと非常 


はそんな迷路には入りたくありません）そ 
のたびにわざわざプログラムを変える必要 
はなくなってしまうのです。つまり，こう 
すると平面だけでなく立体の迷路も作れる 
のです。具体的にはどうすればいいでしょ 
う。変更点はたったの2力所。プリプロセ 
ツサに指定するところで， 
dimension を2から3に 
size _ z を3からもっと大きな奇数に 
するだけでよいのです（迷路のサイズは， 
道と壁の幅が同じになるようにプログラム 
してある関係上，必ず奇数にしなくてはな 
りません ） 0 もし， x ， y ， z を別々に処理して 
いると，プログラムにかなりの変更を加え 
る必要があったでしょう。 


II 


第一の障害 


まあ，とにかくリスト1の座標変数をベ 
タトルで書き換えて，さらに道を掘り抜く 
ように変更したプログラムを作ってみまし 
た0直ちにコンパイル，そして実行0 

いきなり，グチヤグチヤに壊れた迷路が 
出てきました。なぜなのでしようか。もし 
かしたら，ベクトルなどという型を勝手に 
作ったので神の怒りが下ったのでしようか。 
この原因は， BASIC で同じようなプログラ 
ムを作ってみるとわかります（もちろんべ 
クトルは使えませんが） 〇 BASIC インタプリ 


夕は次のようなメッセージを出してくれる 
はずです。 

添字の値が異常です 

結論からいいますと，このとき竜は迷路 
の建物からはみ出してしまったのです。壁 
を作る竜の場合は端っこの壁のところで止 
められたのでエラーは出なかったのですが， 
道を掘る竜ではそうはいかず（壁となる石 
と，枠とは区別されていないのです），迷路 
の外（つまり配列の定義されていない部分） 
までめくらめっぽうに食い荒らそうとした 
ために，妙な迷路ができあがってしまった 
のです。 C のオブジェクトコードには，配 
列の添字のチェックなどといった，実行速 
度を落とすようなものはいっさい入ってい 
ないので，ここから致命的なエラーを起こ 
すことがしばしばあります。この場合は， 
へ夕をすると章がプログラム本体を壊して 
しまう可能性もあったわけです。ああ恐ろ 
しい0 

というわけで，ここのデバッグをした結 
果が outcheck () というルーチンです (129 
行)。竜が迷路からはみ出そうとすると，強 
制的に動きを止めさせます。要するに，こ 
れはアルゴリズムのミスで，ベクトルを使 
ったのとはなんの関係もないノ <グでした。 

これでまともに動くようになったのです 
が，障害はこれだけにはとどまらなかった 
のです。 


構造体の罠 


先ほど構造体のメリットについて長々と 
話ししましたが，実は構造体には少し厄介 
な制限があるのです。構造体で型宣言した 
変数は，ふつうの変数とまったく同じに使 
うことはできないのです。もう少しいうな 
ら，構造体を引数に取る関数や，結果を構 
造体で返す関数は作れないのです。もっと 
もこれは，今の標準的な C だけの話で ，X 
C ならこれは自由です（ただしこれを使う 
と， コンパイ ラが替告メッセージを出すこ 
とはあります。ま，警告は警告，エラーで 


図7 迷路の解き方 
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はないので無視して実行させると，ちゃん 
と動きますけど）。将来はこんな制限もな 
くなるのでしょうけど（？）。 

実は，僕は XC で作っていて，この制限 
を知らずに プログラムを 組み上げてしまっ 
ていたのを，「それはいけないよ」と指摘 
されて，あとから変更するハメになったの 
でした。「全部ポインタを使えばいいじゃ 
ないか」……そう，文字列のように，ボイ 
ンタを利用してしまえばいいのです。 

まず僕がやった変更は，小さなサブルー 
チンの中で構造体のメンバを参照している 
ところでした。ふつうの構造体のメンバ参 
照式は「.」（ピリオド）ですが，ポインタ 
から参照する場合は「一>」ですから，こ 
れだけを機械的に変えていきました。次に， 
関数はポインタで呼び出すんだからと，引 
数になっているべクトル変数の名前の頭に 
間接演算子 （*) をくっつけて回りました。 
まあこんなもんだろうと思ってさっそくコ 
ンパイルしてみると， 

間接演算子 （*) がポインタ以外に使 

用されている 

という エラーが 出てしまいました。 

どうも僕は間接演算子の意味を取り違え 
ていたようです。確かに「*」をつけたべ 
クトルは，ベクトルという値であって，ポ 
インタではありません。関数を呼び出す側 
では，「*」ではなくアドレス演算子 （&) 
を使うのが筋でしょう。 「& J は変数の「格 
納アドレス」を与え，「*」はポインタが指 1 
す「アドレスの内容」を参照するのですか 
ら。ううむややこしい。 

ポインタの迷路を抜けて 

というわけですから，呼び出す側では 
「&」，受け取る関数の側では「*」，という 
ふうにすればいいのでしょう。今度は無事 
コンパイルが終了しましたから，意気楊々 
と実行させたのです。 

パ、スエラーが発生しました 

おっとっと。いきなりこの攻撃には参り 
ました。コンパイラを通ったプログラムが， 
マシン語 レベルのエラーを出してストップ 
するとは！ 幸い X68000 で作業していま 
したからエラーで中断できましたが，これ 
が Z80 だったら暴走しています。いったい 
どうしたというのでしようか。これは，コ 
ン パイルエラーが出ていないだけになかな 
かの難問です。 

関数 mazemake( ) 中の HEAD (83 行）は 
引数のベクトルではありますが，メインル 
ーチンから「&」つきで渡されてきたボイ 


ンタなのです。僕は，この HEAD にもう一 
度「&」をつけてほかの関数を呼び出すの 
に使ってしまっていました。すると，その 
関数にはポインタが格納されているアドレ 
スが渡り，呼び出された関数はそれをボイ 
ンタと思い込んで受け取り，そこで構造体 
のメンバ，つまりべクトルの座標値を参照 
するつもりが，ポインタの値自体を読み出 
してしまい，座標値を使って迷路の要素を 
読み出すつもり力 ? ，変なアドレス（おそら 
くスーパーバイザ領域でしよう。もしかす 
るとメモリが実装されていない領域かも） 

から読み出そうとしてしま L . ，という 

のが真相なのでしよう。 

なんだかわけがわからなくなってしま 
ました（ポインタをきちんと理解してい 
人ならなんとかわかるんじやないでしよう 
か）が，要するに， HEAD の前の「&」が 
悪人なのです。では，どうすればいいので 
しようか 0 困って，関数 mazemake () の 
頭の引数定義の部分を見ると， 
vector * HEAD ; 

とあるではありません力 1 。「ああそうか， 
この関数の中では HEAD は『*』つきでや 
っと一人前なんだな」と思った僕は，いそ 
いそと HEAD の前の「&」を「*」へと変 


えたのです0そこでコンパイル。 

関数呼び出しでの引数の型が'正しくな 

い 

構造体/共用体が関数への引数として 
指定されている 

などと コンハ。 イラは警告メッセージを出し 
ましたが，オブジェクトはちゃんと出てき 
たので，「エラーじゃないし，まあいいや。 
構造体に警告はつきものなんだろう」とば 
かり に 実行 させたのです。 

アドレス エラーが 発生しました 
むむむいったいぜんたいどういうことな 
のでしよう。もうお手上げだあ！ 




解決編 


……などと悩んだふりをするのはやめて， 
さっさと種明かしをしてしまいましよう。 
なんのことはありません。実は HEAD には 
なにもつけなくていいのです。 mazemake 
() をもう一度よく見ましょう。関数宣言 
部の引数リスト，つまりカツコ内には 
vector mazemake ( HuAD ) 

と， HEAD が「*」なしで書いてあります0 
これこそがポインタです。「*」をつける 
と，そのアドレスの内容，すなわちべクト 


リスト3バスエラー修正前 


NEWHEAD, HEADMOVE ； 


void mazemake( HEAD 
vector *HEAD； 


vector 
int 

unsigned char c ； 
length=0; 

raazeput ( 本 HEAD, body ); 

while ( raazeget( *HEAD ) : =air ) { 

v_cpy ( &DRAG0N1[ length 】 ， *HEAD ) ； 
for ( i=0; i<=(dimension*2-1);i++ ) { 

r=random(dimension*2)+1; 
v_mul( &HEADMOVE, &DIRECTION[ r ], 2 
v_add( &NEWHEAD, 本 HEAD, &HEADMOVE ) 
if ( outcheck( &NEWHEAD ))( 

v_cpy( &NEWHEAD, 拿 HEAD ) ； 
r = 0; 


/ 本 vector <75 fg 杳本 / 

/* 引数にしては*/ 
/* いけません*/ 

/* *HEAD が間違い */ 


リスト4アドレスエラー修正前 


void 
vector 
( 


mazemake( HEAD 
拿 HEAD; 

vector 

int 

unsigned char 


NEWHEAD, HEADMOVE ； 
i» r f 1; 


length=0; 

mazeput( &HEAD, body ); 

while ( mazeget( &HEAD ) !=air ) { 

v—cpy< &DRAGONl[length) f &HEAD )； 
for ( i=0; i<=(dimension*2-1);i++ ) { 
r=random< dimens ion* 2 ) -f 1; 
v—mul< &HEADMOVE, &DIRBCTION[r], 2 
v_add{ &NEWHEAD f &HEAD, &HEADMOVE 
if ( outcheck( &NEWHEAD ) ) { 

v—cpy{ &NEWHEAD, &HEAD )； 
r=0 : 


/* ボインタへのボインタなんて */ 
/* 恵味がありません */ 

/* &HEAD が問連い " 


04 Oh ! X 1988.7. 





ルの値を指すのです。引数の型宣言をして 
いるところの 「vector * HEAD 」 は，「この 
関数はベタトルへのボインタを引数として 
とるんだけど， vector という型の宣言だか 
ら（ポインタじやないから）『*』をつけて， 
値のかたちで定義してるんだよ」というこ 
となのでしょう。 

この関数の中からさらにほかの関数を呼 
び出そうとするなら，このプログラム中の 
関数の引数はボインタでなくてはなりませ 
んので，なにもつけない HEAD で呼び出す 
のです。ちなみに，「&」をつけるのは， 
一応ポインタですから文法的には間違って 
いないので， エラー も替告も出ずに コンパ 
イルは終了します 力す， このポインタはべク 
トル変数へのポインタではなく，ベクトル 
変数へのボインタへのポインタですから 
(あ一面倒臭い），とんでもないアドレスを 
指•します。この場合，ポインタへのポイン 
夕なんてまったくのナンセンスといえるで 
しょう（こういう特殊な使い方ができない 
とはいいきれませんが)。 

ちょっと整理しましょう。要するに次の 
ように書いてくれればいいのです。 


void 

/ 

main () 


\ 

vector V ; 

••値 


funcl (& V ); 

:ポインタ 

} 

void 

fund (V 1) 

:ポインタ 

vector 

*V 1; 

:内容(値) 

l 

int a ; 



vector V 2 : 

:値 


a = func 2( Vl ,& V 2); 

:ボインタ 



(どちらも） 

L 

func 2( Va , Vb ) 

:ポインタ 

vector * Va , * Vd ; 

: 内容(値） 


{ 


図8 立体迷路の出力例 


int 


x ; 


すべての C 
>ようになつ 


retum ( x ) : 

} 

あまりうまく書けませんでしたが，感じ 
くらいはつかめるでしよう。 

ともかく，これでめでたく動〈ようにな 
りました。でも，リストを見ると，関数の 
引数に&がついたりつかなかったりしてい 
るし，関数の呼び出しを見ただけでは，引 
数がポインタなのか値なのか，全然わから 
ないこともあるのです。これははっきりい 
って見苦しいと思います。早く 
が，構造体を制限なしで扱える， 

てほしいと願う次第でした。 

このように， C という言語は，変数の チ 
ェックが非常に甘い（その代わりに強力で 
あるともいえるのですが）ので，よく暴走 
を起こします。パ、 スエラー や アドレスエラ 
一は， ランタイムルーチンが 常に監視して 
いて変数をチェックした結果がおかしかっ 
たからというのではなく，あくまでオブジ 
ェクト プログラムがシステム に対して悪事 
を働こうとしたために起きた エラー です。 
いくら実行が止まったからといって，両者 
を混同してはいけません。これは システム 
がス トップをかけたにすぎず， MC 68000の 
力によるものなのですから。 C はそれほど 
親切ではありませんよ。 

最後は迷路を解くプログラム solve . c です 0 
このうちのいくつかの関数は maze 2. c と共 
通のものです。このプログラムでは，ファ 
イルの扱いが少々面倒でしたが， C ならで 
は，というエラーも出なかったので，デバ 
ッグのお話は省略します。 C はコマンドラ 
インからのパラメータを簡単に受け取れま 
すのでファイル処理にはうってつけだとい 
えるでしよう。 

プログラムの使い方はどれも同じです。 
コマンドラインから 

mazel く filename 〉 
maze 2 く filename 〉 
maze 3 く filename 〉 


solve < rilename > 

とやります。 mazel と maze 2 はく filename 〉 
で指定されたフアイルに迷路を出力します。 
スク リーン エディ タにでもかけて遊んでく 
ださい。プリンタに打ち出すのもいいでし 
よう 0 ちなみに maze 2 に前にいった2力所 
の変更をして3次元仕様に直してやると， 
「どうやって解けというんだ!？」といいたく 
なるような出力をします。それから s _ olve と 
いうのは， 〈 filename 〉 で与えられた迷路 
の不要な道を塗りつぶして正解を教えてく 
れます。 


最後に 


本当は3次元迷路と称して，作った迷路 
の中に入りたかったのですが，それは RPG 
でやり鮑きてるだろうし，そもそもプログ 
ラムが大き〈なりすぎるからやめにします。 
暇な方は，メモリの続く限り大きい迷路を 
作ってみてはいかがでしようか。そのとき 
はプリプロセツサの size _ x ， size . y , size_z 
(それぞれ迷路のサイズ。すでにいったよ 
うに必ず奇数にすること ）， maxlength ( 1 
匹の竜の体長。いくら大きくしても，配列 
がメモリを食うだけで，プログラムの実行 
に影響はありません）の値を大きくしてく 
ださい。ただし，このときは， solve . c のプ 
リプロセッサの値も大き〈しないと，解け 
ない迷路ができてしまいます。 

ついでにい いますが，乱数は いつも 同じ 
なので，迷路が ワンパターンになって しま 
います 0 変えたいときは， randomize の値 
を変えてください。 

できればポインタは避けて通りたかった 
のですが，さすがにそういうわけにもいか 
なかったようです。 C プログラマになろう 
と思ったら，ポインタぐらいは使えなくて 
はい けないのでしようが， こいつは なんと 
もイヤラシいシロモノでした。皆さんも心 
してかかって〈ださい。 システムを 2， 3 

回破壊するくらいの覚悟は必要です（特に 
Z 80 の人)。 

以上， XC での開発を例にとって，いろ 
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いろと c プログラマのひっかかるワナには 
まってみせましたが（わざとひっかかった 
ものもあるし，本当にひっかかって悩まさ 
れたものもありますが），このプログラム 
は Z 80の C でも動くはずです。くれぐれも 
暴走には気をつけましよう。もっとも暴走 
させた経験からはいろいろなことが学べま 
すから，惡いことばかりでもありません 
(そんなことないか）。それではこれにてさ 
ようなら。 
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10-J 


/*(x,y) に霞かれた */ 
/* 卵からかえった */ 
/* 竜が壁を作る */ 


/» 出発点に烟を * く */ 
/* 石になるまで */ 

/* 頭の座標 */ 


/* 行き先が */ 

/* 空間だったら _ 体を伸ばす */ 


/* 新しい酋を！ ■ く */ 

/* 新しい頭を IR く */ 

/* 嗣体を伸ばす */ 

パ ® だったら石になる */ 


酮体だったら */ 

/* 賊を別のところから出す */ 


/* コマンドラインからの */ 
/* バラメータ */ 


void 

int 


mazemake( x, y 
x, y; 


int 

unsigned char 


yl,x2, y2, 


length=0 ； 
maze[x 】 [y 】 =body; 
while ( maze 【 x 】 fy 】！ =;wall){ 
dragonl—x[length]=x ； 
dragon し yllength]=y; 
for ( i 二 0; i<4; i++ )( 
r=random(4); 
xl=x+dx[r 】 本 2; 
yl=y+dy[rj*2; 
c=maze[xl][y1]; 
if ( c!=body ) break ； 

) 

switch ( c ) { 

case air ： 

x2=dragon2_xI length い x+dx[r 】 ; 
y2=dragon2_yTlength]=y+dy[r] : 
maze[x2 】 [ 】二 body; 
maze Ix1][y1]=body; 
x=xl : y=yl ； 
length-f +; 
break ； 
case wall: 

x2=dragon2_x [length ] =x4-dx l r ]; 
y2=dragon2_y[length)=y+dylr1 : 
maze[x2 】 [y2 】 =body ； 
x = xl;y=y 1 ； 
stone ()； 
break; 
case body : 

drHgon2_x[length)=x ； 
dragon2_y[J ength]=y ； 
l=random{length )； 
x=dragonl_xr1 )； 
yrdragon1_yI 11 : 

1••ngt I * ; 

hr^ak ； 


void main{ argc, argv ) 

int argc ； 

char *argv{]; 

{ 

int x0 y y0 ； 

mazeclr ()； 
makewall ()； 
srand(randomize); 

for ( y0=2; y0<=size_y-3; y0+=2 ) { 

for ( x0=2; x0<=size_x-3; x0 + =2 ) 
if ( mazelxOllyO]!=wall) 

mazemake( x0, y0 }; 

} 

makedoor ()； 
printout ()； 

if ( argc>1) output( argv[1)); 


►うちの XG 8000 は浓い。 BGM は流れるわ, 30秒間隔で画面の色が変わるわでもう大変! 
このごろはバーサと格闘している毎日です。 木村昌樹 （16) 山形斟 


■ J スト1 


mazel.( 



maze making program 

dragon method ( 

grow 

*/ 

#include <stdio.h> 


♦ include <std 1 ib.h > 


#define 

size_x 

21 

#define 

size_y 

maxlength 

21 

#define 

256 

♦define 

randomize 

1 

#define 

air 

» * 

#define 

wall 

•d* 

#define 

body 

，巷， 

unsigned char raaze[size x][si: 

se_y ]； 

int 

dragonl_x[maxlength] f 


dragon2_x[maxlength], 


dx[4]=(-l,1,0, 

, 0}, i 

int 

length ； 


void 

mazemake() ； 


void 

stone() ; 


void 

mazed r( )； 


void 

makewall () ； 


void 

makedoor ()； 


void 

printout (); 


void 

output () ； 


int 

random ( int ); 



/* - 


クルードファ 


dyI4]={0, 0, -1 


" 迷路の大きさ */ 

/* ( 奇数に限る ）*/ 
/* 窀の体技の最大浦 */ 
/* 乱数系列 */ 

/* 空間（道 ）*/ 

/* 壁 */ 

/* 竜の酮体 */ 


/* 迷路本体 */ 

ハ竜の胴体の座 * ( その 1 
/* 竜の調体の座掼（その 2 
/* 竜の頭の変位 */ 

/* 竜の体長 */ 


>閱数のフォワード宣苗 */ 


*/ 

本/ 


t j 

/// 〇/ 

拿拿 t -H 

る択る*/よる 
め選探にいべ 
決らを体な網 
をか先_かで 
き向きくつま 
向方行べみ回 
く 4のる_4 
動頭な 

拿拿拿拿本拿 

////// 


拿 

*/ ば 
る */>/ れ«/ 
いでる ある 
*/ で*/のせ がす 
*/ 化*/んらるら V */定力 
«/る期く死なめ作るる指出 
化作初いらい始をけすのも 
期ををてななき壁あ力名に 
初枠列い下で歩のを出ルら 
をの系 B のうは路口にィち 
路路数を壁そ«迷入面ァそ 
迷迷乱卵 出画フ 

京本本本本本拿本拿拿*-拿 

//////////// 




特集迷宮入りの迷路作り 


/* 0 -n- 1 の乱数を返す */ 


/* 立体迷路では 3 に変える */ 


/* 奄を石にする */ 


/* 迷路を初期化する */ 


/* 迷路の枠を作る */ 


/* 出入り口をあける */ 


/* 画面に出力する */ 
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int 

int 


int 

for 


= 0 ； i<=length ； i++ ) { 

maze[dragonl_x[i]] 【 dragonl_y 【 i]]=wall; 
maze[dragon 2 _x[i]][dragon 2 _y[ij]=wall; 


mazeclr() 


int 

for 


y ; 


y= 0 ； y<size_y; y++ ) { 

for ( x= 0 ； x<size_x ； x++ 
maze[x][y]=air ； 


makewall() 

int x, 7 ； 

for ( y= 0 ； y< 8 ize_y ； y++ 
maze[ 0 ]f y]=wall ； 
maze[size_ 


} 

for 


=0 ； x<size_x ； x++ ) { 

maze[x][ 0 ]=wall ； 
maze[x][size_y-l]=wall; 


void 

char 


makedoor() 

maze[ 1 ][ 0 ]=air ； 

maze[size_x- 2 ][size_y-l]=air; 


printout() 
int x, y ； 

for ( y= 0 ； y<size_y ； y++ ) { 

for ( x= 0 ； x<size_x ； x++ ) 

printf( "%c", maze[x][y ])； 
printf ( ,, ¥n , ')； 

} 


output( filename ) 

*filename ； 

int x, y ； 

FILE 拿 mazefile; 

mazefile=fopen( filename, "w"); 

for ( y=0 ； y<size_y; y++ ) { 

for ( x=0 ； x<size_x ； x++ ) 
fprintf( mazefile, 
fprintf( mazefile, "¥n ")； 

) 

fclose( mazefile ); 


"%c", maze[x][y] 


random( n ) 
n ； 

int r ； 

r=rand() / (32768/n) : 
return( r ); 


U ネト 2 maze £. c 


/* 

本/ 


maze making program 

dragon method 


(dig & lost 


♦include 

tinclude 

#define 

♦define 
♦define 
#define 
♦define 
#define 

#define 
#define 
#define 


く stdio.h> 

く stdlib.h> 

dimension 

size_x 
size_y 
size_z 
maxlength 
randomize 

air 

wall 

body 


21 

21 

3 

1024 

1 

0 

255 

1 


► ••理工系の BASIC 入 H«i とはなんという本だ！著者が全員青山学院大学の先生ではな 
いか。これではまるで青山の教科書のために書かれたみたいじやない力、しかも著者のひ 
とりは私の先生ではないか。 泉昭彦（18> 神奈川県 
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typedef struct { int a[3 ]； I 


vector; 


/* 型 vector の定義 */ 


/*HEAD に置かれた */ 

/* 卵からかえった */ 

/* 窀が道を掘る */ 

/* この関数では、 HEAD と */ 

/本 &NEWHEAD, &HEADMOVE といろ */ 
/* 使い方の差に注意する */ 


void mazemake( HEAD ) 

vector 本 HEAD; 

{ 

vector NEWHEAD, HEADMOVE; 

int i , r,1; 

unsigned char c ； 

length=0; 

mazeput( HEAD, body )； 

while ( mazeget( HEAD )!=air ) | 

v_cpy( &DRAG0N1[length] , HEAD ); 
for ( i=0; i<=(dimension*2-l);i++ ) { 

r=random(dimension*2)+1; 
v_mul(&HEADMOVE, &DIRECTION[r], 2 )； 
v~add( &NEWHEAD, HEAD, &HEADMOVE ) ； 
i f ( outr»heck( &NEWHEAD ) ) { 

v_cpy( &NEWHFAD, HEAD )； 
r = 0 : 

) 

c=mazeget( &NEWHEAD )； 
if ( c!=body ) break; 


switch ( c ) { パ行き先が零 / 

case wall ： /* 壁なら掘り進む*/ 

v_add( &DRAG0N2Ilength 1 ,HEAD, ^DIRECTION[r })； 
mazeput( &DRAG0N2[length], body )； 
mazeput( &NEWHEAD, body ) : 
v_cpy( HEAD, &NEWHEAD )； 
length ++； 

case air: /* 空間なら消え去る*/ 

v_add( &DRAG0N21length], HEAD, ^DIRECTION[r ])； 
mazeput( &DRAGON2[Length], body ); 
v_cpy( HEAD, &NEWHEAD ) : 
lost(); 

oase body : /* _ 体なら頭を別に出す*/ 

v_cpy( &DRAG0N2[length] , HEAD ) ； 
l=random(length )； 
v_cpy( HEAD, &DRAGON1(1]>; 

1ength ++； 
break ； 


► M •近残龙で锄ると，遊が源平討魔伝をやっています。やるヒマのない私に妻は「私が先 
に クリアする j と燃えています。上海でもかなわなかったし，マンハッタン レクイエム も 
解かれてしまったばかり。このままでは X 68000 はどうなるのだろうと心配の毎日です。 

高橋智行 （26) 埼玉 W 


void main( argc, argv ) 

int argc ； 

char *argv []； 

{ 

int x0, y0, z0; 

vector EGG; 

mazefi11 ()； 
makedoor ()； 
srand(randomize )； 

for ( z0=l ； z0<=size_z-2 ； z0 + =2 ) { 

for ( y0=1;y0<=size_y-2 ； y0 + =2 )( 

for ( x0=1 ； x0< =size_x-2 ； x0 + = 2 ) { 

if ( maze[x0][y0][z0]==wal1) 
EGG.a(0]=x0 ； 

EGG.a[1]=y0 ； 

EGG.a[2]=z0 ； 
mazemake( &EGG )t 


printout ㈠ ； 

if ( argc> 1 ) output( argv[ 1 ]); 


unsigned char raaze[size_xj[size_y][size_z ]； 
vector DRAGON 1[maxlengthTi 

DRAG0N2[max Length], 
DIRECTI0N[7]={ 

0 , 0 , 0 , 


length ； 


1)； 


バ迷路本体 */ 

/* 竜の酮体の座標 */ 

パ竜の頭の変位 */ 

/* 構造体の配列の */ 

/* 初期化のしかた */ 


void mazemake( vector * ) ； 

int outcheck( vector * )； 

void lost ()； 

void raazefill ()； 

void makedoor {)； 

void printout ()； 

void output( char * )； 

int random( int )； 

void v _cpy( vector 本 , vector 本 )； 

void vadd( vector 本 ， vector 本 ， vector 本 )； 

void v_mul(vector 本 ， vector 拿 ， int )； 

unsigned char mazeget( vector * )； 

void mazeput( vector *, unsigned char ) : 


/*vector 型の引数は本 / 
/* すべてポインタ */ 
/* になっている <7 


本木 1 

*/*/ 向向 ぅ*/*/ 

く る方方 */ よ回回 
S */ め46 */ にい 46*/ 
をで決らら*/る体なららる 
頭ま*/をなな択探詷かななベ 
にる摞き元元還をくつ元元 IH 
点去座向次次ら先べみ次次で 
発えのく23かきる_23ま 
出消頭動 行な 

本本**本*本本本本*本拿 

///////////// 



る */ たでせ 
す くつのら 
化いだる掘 
期て壁えを 
初いがか道 
を S こはに 
路をそ卵竜 
迷 卵 

本 本家本本 

/ //// 






128 ： 

129 : int 
130: vector 
131 : { 

132 ： 

133: 

134 ： 

135 ： 

136: 

137 ： 

138: 

139 ： 

140:) 

141: 

142 ： 

143: void 
144 ： { 

145: 

146: 

147: 

148: 

149 ： 

150: 

151： } 

152 ： 

153: 

154: void 
155: { 

156: 

157: 

158: 

159 ： 

160: 

161: 

162: 

163 ： 

164: 

165: } 

166: 

167: 

168: void 
169 ： { 

170: 

171 ： 

172: 

173 ： 

174 ： 

175 ： } 

176 ： 

177 ： 

178 ： void 
179 ： { 

180 ： 

181 : 

182 ： 

183: 

184: 

185: 

186 ： 

187 ： 

188 ： 

189 ： 

190: 

191 : 

192 ： 

193 ： 

194 : 

195: 

196: 

197 : 

198 ： ) 

199 ： 

200 : 

201 : void 
202 : char 
203: { 

204 : 

205: 

206 ： 

207: 

208: 

209: 

210： 

211： 

212: 

213: 

214 ： 

215 ： 

216: 

217: 

218: 

219: 

220 : 

221 : 

222 : 

223： ) 

224: 

225 ： 

226: int 
227: int 
228: { 

229: 

230: 

231 ： 

232: 

233: 

234 ： } 


outcheck( V ) 
*V ； 


/» 竜が外に出るのを防ぐ*/ 
/* 引数はボインタで*/ 


int X ， y, z, out=0 ； 

x=V->a[0] ； /* ボインタからのメンバ参照 */ 

y=V->a[ 11 ； 
z=V->a[2] ; 

if ( x< = 0 || x> = size_x || y< = 0 || y> = size_y || z<=0 I I z>=size_z ) out=l ； 
return( out )； 


/* 竜を抹殺する*/ 


/* 迷路を壁で埋める*/ 


for ( x= 0 ; x<size_x ； x++ ) { 

maze[x 】 [y][z]=wal 1 ; 


makedoor() 
int z ； 

for ( z = 0 ; z< = 1 ;z++ ) 

maze[ 1 ][ 1 ][z]=air; 

maze[size_x- 2 ][size_y- 2 ][size_z-l]=air ； 


lost() 
int i; 

for ( i= 0 ; i<=length; i++ ) { 

mazeput( &DRAGON1[i] f air )； 
mazeput( &DRAGON2 【 i], air ); 

) 

mazer 111 () 

int x, y, z ； 

for ( z =0 ； z く size_z; z++ ) { 

for ( y=0; y<size_y ； y++ ) { 



int x, y, z ; 

for ( z=0; z<size_z; z++ ) { 

for ( y=0 ； y<size_y ； y++ ) { 

for { x = 0 ； x <s i ze _x; v + + ) { 

switch ( mazelx][y][z] ) { 

case air: 

printf( " •') 
case body : 

printf( ) 

case wall: 

printf( m D m ) 


printf ( ..¥n..) : 

) 

printf( "¥n ")； 


break 

break 

break 


output{ filename ) 

^filename ； 

int, x , y , z ; 

FILE *mazefile ； 

mazefi1e= fopen( filename, "w )； 
for ( z=0 ； z<size_z ； z++ ) { 

for ( y=0; y く size_y; y++ ) { 

for ( x=0 ； x<size_x ； x++ ) { 

switch ( maze[\]Iy][z] ) { 

case air: 

fprintf ( mazef i le , " ); break : 

case wail: 

fprintf( mazefile, "D" )； break ； 


fprintf( mazefile, "¥n ")； 

} 

fprintf( mazefile, "¥n" I : 

) 

fclose( mazeflie )； 


random( n ) 
n; 

int r ； 

r=rand() / (32768/n )； 
return( r )； 


►锊さん，もう知っていると思いますが源平討魔伝の源平 m ain . x などのフアイルをダンプ 

してみると商14いメッセージが読めますよ 。 SHELL = 源平討魔伝. X も笑えます。 特集迷宮入りの迷路作り 

荒井和彦（28> 群馬阽 





237 

void 

v cpy( VI,V2 ) 

/* ぺク 

トルのコビー */ 

238 

vector 

*V1,*V2 ； 



239 

{ 




240 


int i; 



241 





242 


for ( i=0 ； i<3 ； i++ ) 



243 


Vl->a[i]=V2->a[i]; 



244 

} 




245 





246 





247 

void 

v add( VI,V2, V3 ) 

/* ぺク 

トルの 加算*/ 

248 

vector 

*V1, *V2, 拿 V3; 



249 

{ 




250 


int i ; 



251 





252 


for ( i=0; i<3; i++ .) 



253 


Vl->a[i]=V2->a[i]+V3->ari ]； 



254 

} 




255 





256 





257 

void 

v_mul { VI,V2, t ) 

/* べク 

トルの 整数 倍 */ 

258 

vector 

*V1,*V2 ； 



259 

int 

t ； 



260 

C 




261 


int i; 



262 





263 


for ( i =0 ; i<3 ; i++ ) 



264 


Vl->a[i]=V2->a(i]*t ； 



265 

) 




266 





267 





268 

unsigned char mazeget ( V ) 

/* べク 

トルで示される場所の */ 

269 

vector 

* v ； 

/* 状想を調べる */ 

270 

{ 




271 


int x, y, z ； 



272 





273 


x=V->a[0] ; 



274 


y=V->a[l] ; 



275 


z=V->a [ 2 ]； 



276 





277 


return ( raazel x Jl y ]f z ]) ； 



278 

} 




279 





280 





281 

void 

mazeput ( V, c ) 

/* べク 

トルで示される場所に */ 

282 

vector 

* v ； 

/* キャラクタを入れる */ 

283 

unsigned char c ； 



284 

{ 




285 


int x, y , z ; 



286 





287 


x=V->a[01 ; 



288 


y=V->af 1] ； 



289 


z=V->a[2 ]; 



290 


maze[x][yj [ z ] =c ； 



291 

) 





u 


スト 5 


solve, c 


1 

/* 




2 


maze solving program 


3 



dragon method 

(grow & dead ) 

4 

♦/ 




5 

6 



乂 


7 

#mclude 


<stdio.h> 


8 

#mclude 


<stdlib.h> 


10 

#define 


maxsize x 

127 

11 

♦define 


maxsize_y 

127 

12 

#deiine 


raaxsize^z 

9 

13 





14 

#define 


air 

0 

15 

#define 


wall 

255 

16 

#dei me 


body 

1 

17 





18 





19 

typedef : 

struct 

f int a[3 ]； } 

vector ； 

20 





21 

unsigned 

char 

maze[maxsize_x][maxsize_y][maxsize : 

22 

vector 


DIRECTI0N17]={ 


23 



0, 0, 

0, ' 

24 



-1 ， 0 ， 

0, 

25 



1 , 0 , 

0, 

26 



0,-1, 

0, 

27 



0, 1 , 

0, 

28 



0, 0, 

-1 , 

29 



0, 0, 

1 }； 

30 

int 


diroension=3 9 size x, size_y, size_z; 

31 





32 





33 

void 


maze 801 ve< vector t ) : 

34 

int 


status( vector 

* )； 

35 

void 


printout ()； 


36 

37 

void 

void 


input( char 本 
output( char t 

)； 

) : 

38 

void 


mazecopy( int, 

int )； 

39 

void 


v_add( vector 

*, vector 本 • vector * 

40 

void 


v mul(vector 

*, vector 本 , int )； 

41 

unsigned 

char 

mazeget( vector * )； 

42 

void 


mazeput( vector *, unsigned char )； 

43 





44 






ハ大きな迷路でも読み込める*/ 


70 Oh ! X 1988.7. 


► 6 月号の77ページで「ナインという線もありますが」といっている編集の人，あなたは 
立派な“おたく”だと思います。ジャンボーグ A なんて，もう誰も党えていませんよ，編 
班後記からして U さんです力 。 斉藤典昭 （21) 神奈川県 










while( (s=status(HEAD)) : =0 ) ! 

mazeput. ( HEAD, body ); 

v_add( HEAD, HFAD, ^DIRECTION[s1 

mazeput( HEAD , body )； 

v_add( HEAD, HEAD, &DIRECTIONts] 

} 


int status( HEAD 

vector 本 HEAD; 


int i, s=0; 

vector NEWHEAD ； 


= 1 ； i<=dimension* 2 ； i + + ) { 

v_add( &NF.WHEAD, HEAD, &DIRECTIONf i ])； 
if ( mazeget( &SEWHEAD )!=air ) continue ； 
if ( s==0 ) { 

s=i ； continue ； 

)else { 

8 = 0 ; break; 


return( s 


printout() 
int v, y, 


/* ここは maze2 .c と同じ */ 


z; 


for 


z=0 ； z<size_z ； z++ ) { 

for ( y= 0 ； y<size_y; y++ )( 

for ( x =0 ； \<size_x ； x++ ) { 

switch ( maze|x]ly][z]) 
case air: 

printf( 
case body : 

printf( 
case wall: 

printf( 

} 

} 

printf( ”¥n- 

} 

printf( "¥n"); 


) ； break ； 
) ； break; 
) ； break ； 


void 

char 


input( filename 
本 filename; 

int 

FILE 

unsigned char 


x, y, z, sx, sy, sz 
*mazefile ； 
line[maxsize_x+l ]； 


/* ファイルを嫌み込み*/ 

/* 迷路を配列にしまう*/ 


mazefile=fopen( filename, "r"); 
az= 0 ; 

for ( z= 0 ； z<maxsize_z; z++ ) { 
sy= 0 ; 

for ( y= 0 ； y<maxsize_y ； y++ ) { 

fgets (line, raaxsize_x+ 1 ,mazef ile ); /*— 行嫌み込み */ 

sx = strlen( line )-1 ； /* 艮さをとって */ 

if ( sx >2 ) size_x= 8 x ； /* 配列に入 :^ る */ 

else break; 

for ( x= 0 ; x<sx ； x++ ) { 

switch (line[xj ) { 

case '' : 

maze[x 】 [y 】【 z]=air; break : 


void main( argc, 

int argc; 

char *argv []； 


int 

vector 


x0, y0, 
EGG; 


argc> 1 ){ 

input( argv[ 1 】 ) : 

for ( z 0 = 1 ； z 0 <=size_z- 2 ； z 0 + = 2 ) { 

for ( y 0 =l;y 0 く =size_y- 2 ; y 0+=2 ) I 

for ( x 0 =l ； x 0 <=size_x- 2 ； x 0 + =2 
EGG.a[0]=xO : 

EGG.a[l]=y0 ； 

EGG.a[2]=zC; 
maze 801 ve( &EGG )； 


/» ファイル名の指定は必要*/ 
/* それを狭み込む*/ 

/»卵を*いていく*/ 

)( 

/»いちおう全部かえる*/ 

/* 行き止まりを埋めさせる*/ 


aimension==2 )( 
mazecopy (0,1}; 
size_z=l ; 


printout ()； 
output( argvi1 


/ 家 maze 1• c だけ */ 

/* データ構造が違うので*/ 
/* その対策*/ 


void mazesolve( HEAD 

vector *HEAD : 


迷路の行き止まりを埋める*/ 


45 
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81 
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103 

104 

105 

106 
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108 

109 

110 
111 
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113 

114 
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120 
121 
122 

123 

124 

125 

126 

127 

128 

129 
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131 
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/ 

$ 

*/ る 


間け*/*/ 
い練らぅ 
なきたま 
け動きし 
動ににで 
か向迸ん 
し方れ死 
にのかは 
方そ分竜 


C 家本本 1 

返ら4 6返 
をな/ ~を 
向向11〇 
方方ららは 
る1ななで 
い、元元道 
ては次次れ 
い向2 3か 
空方 分 

本♦♦本** 

/ / / / / 


れ 

ぁ*/ 
てる 
*/ け来 
*/ がつ出 
6だみ断 
な値を判 
間〇間と 
空戻空进 
ががにれ 
先れでか 
きそす分 
行 


►マン レクと胧神宮を交互にやっていると「天国と地獄」が実感できる。とくに移植もの 
に多いが，操作性の悪すぎる ゲームが 横行して いる。 老い先短い ゲーマーにとって，トロ 
い ゲームは 刺薬（触れるといっぺんで死んでしまう）である。木村信（ 35> 神奈川県 
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152 
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161 
162 

163 

164 

165 

166 

167 
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171 

172 

173 

174 

175 

176 

177 

178 

179 

180 
181 
182 

183 

184 

185 

186 

187 

188 

189 

190 

191 

192 

193 

194 

195 

196 

197 

198 


237 

238 

239 

240 

241 

242 

243 

244 

245 

246 

247 

248 

249 

250 

251 

252 

253 

254 

255 

256 


case * 0 * : 

maze[x 】 [y 】 [z]=wall; break; 


if ( sx<3 && y==0 ) br 
sy++; 

} 

if ( sy>2 ) aize_y=sy ； 

if ( feof( mazefile ) ) break; 

sz++; 


void 

char 


size_z=sz; 
fclose( mazefile )； 
if ( size_z==0 )( 

dimension=2 ； 
size_z=3; 
mazecopy(1,0 )； 


output( filename 
♦filename; 


/* maZ el.c で 作つた迷路だけを*/ 
/* 2次元として扱う*/ 

/* 処理しやすいようにずらす*/ 


/*maze2.c とほぼ同じ*/ 


int 

FILE 


x , y , z ; 
*mazefile; 


) : 


mazefile=fopen( filename, 
for ( z=0 ； z<size_z ； z++ )( 

for ( y=0; y<size_y ； y++ ) { 

for ( x=0 ； x<size_x ； x++ ) { 

switch ( maze[x][y][z] ) { 
case air ： 

fprintf( mazefile, 
case body : 

f print f( mazefile, 
case wall: 

fprintf( mazefile, 

) 

} 

fprintf( mazefile, "¥n ")； 

) 

fprintf{ mazefile, "¥n ")； 

} 

fclose( mazefile )； 


) ； break; 
) : break ； 
);break ； 


199 

void 

meuzecopy ( z 

1,z2 ) 

200 

int 

zl 9 z2 

; 


201 

{ 




202 


int 

x, 

y; 

203 





204 


for ( 

y=0; 

for 

y<size_y ； y++ ) { 

205 

206 



(x=0 ； x<size_x； : 
maze[x][y][zl 

207 



} 


208 


} 



209 

} 




210 





211 





212 

void 

v add ( 

VI ， 

V2, V3 ) 

213 

vector 

本 VI,*V2, *V3 ； 

214 

{ 




215 


int 

i ； 


216 





217 


for ( 

i=0 ； 

i<3 ； i++ ) 

218 



VI- 

>ati]=V2->a[i]+V3- 

219 

) 




220 





221 





222 

void 

v mul( 

VI ， 

V2, t ) 

223 

vector 

*V1, *V2 ； 


224 

int 

t; 



225 

{ 




226 


int 

i ； 


227 





228 


for ( 

i=0; 

i<3 ； i++ ) 

229 



VI- 

>a[i]=V2->a[i]*t ； 

230 

) 




231 





232 





233 

unsigned char 

mazeget( V ) 

234 

vector 

* v ； 



235 





236 


int 

x, 

yt z; 


/*mazel.c の 迷路をずらす*/ 


]=maze[xJ[y][z2 ]； 


/* ここから先は*/ 

/* maze2 .c と同じ */ 


x=V->a[0] 
y=V->a[1] 
z=V->a[2] 


return( maze[x][y][zJ )； 


void mazeput( V, 
vector *V ； 

unsigned char c ； 

{ 

int x, 


z; 


x=V->a[0]; 
y=V->a[l ]； 
z=V->a[2]; 
mazetx][yj[z]=c ； 
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プチ•インタプリタを作ろう 

C によるサンプルプログラムとして，簡単なインタプリタ言語を作って 
みるというのはいかがでしようか。菜野氏のプログラムは関数ごとに豊 
富な注釈がつけられています。まずはこれを頼りに1週間ほどかけてプ 
ログラムをじっくりと読んでみてください。 

Kuwano Masahiko 棻野雅彦 


BASIC の次は C の時代だ！とばかりに 
あっちでもこっちでも大流行の C 。 私の C 
とのつきあいは， MS - DOS 上で_力く C コン 
パイラ（ちなみに名前をあげておくと Opti 
mizing C 86) が誰にも使ってもらえずラッ 
クの肥やしになっているのを見つけて以来 
ですから， 3， 4年といったところでしよ 
うか0ホコリまみれの英文マニュアルと悪 
戦苦闘しながら ROM 化するューティリティ 
までこしらえて機器組み込み用のプログラ 
ムを作ったものです。 

その C も，ちよっと前までは「あの UNIX 
のソースコードの大部分が C で書いてある」 
だったのが，聞き慣れたソフト名をあげて 
「〇〇は C で開発した」となってきたとこ 
を見ても，単なるお祭り騒ぎではなく， 
っかりと根をおろしてきていることがう 
がえます。特に4万円以下という低価格の 
C コンパイラが流通するようになってから 
は，ソフトハウスのようなプロの開発者だ 
けでなく，アマチュアにも随分と普及して 
きているようです（かく言う私も XC を買っ 
たひとりです）。 

「 C はマシン語になるから速い」などと， 
理解に苦しむような会話ではしゃいでいる 
ようなことはほとんどなくなり，生成する 
コードの質やライブラリの整備状況などに 
話がいきやすくなったところをみても，ホ 


ビーレベルにも，本気（マジ）に使われて 
きていることは確かなようです。 

さて，われらが Oh ! X でも改名以来初め 
て （！？） 言語としての C を大真面目に取りあ 
げることになりま したが ，形式ばかりの例 
題によるお勉強ではうんざりするというの 
は，周りに人がいて，前方でこちらに向か 
って話をしている人問がいると条件反射的 
に眠ってしまう私だけではないでしょう。 
なにより断片的な知識では C のあり力 5 'たみ 
がわかりません。もっと実践のドキュメン 
卜をという Oh ! X 編集室の意向もあり，ま 
とまったプログラムをこしらえてみること 
になりました。 


n 卜 •インタプリタ 


あくまでもやや大きなサンプルといった 
性格のものですからあまり大袈裟なものを 
作ってもしかたがありません。とはいえ， 
ある程度それなりの行数は必要になるプロ 
ダラムでないと而甶くありません （ C の良さ 
が生かされない）。そのあたりを踏まえてソ 
ースは500〜600行，リスト用紙で10枚前後 
を目標にしてみました。もちろん作り方に 
もよります力 ? ，このくらいあればある程度 
まとまった機能を果たすものが作れそうで 
すし，10枚程度ならそれほど時問をかけな 


くても十分に全体を読み切ることができる 
て"し上ラ0 

さて，10枚程度で何を作りましょう P こ 
のくらいの枚数でも表計算，パーソナルデ 
ータベースなど，いろいろと作れそうです 
が，改造の楽しみやほかへの応用の広さと 
いうことから，ちょっとしたインタプリタ 
を作ってみることにしました。 

言語仕様は BASIC のサブセットですがあ 
くまでも「勉強」が主体ということから， 
これ以上削ると，もはや「言語」と呼べるの 
か怪しくなるような「超サブセット」レべ 
ルのもので，とても 「 BASIC 」 とは呼べそ 
うにありません。そこで BASIC の名は使わ 
ず，「プチ（ちっぽけな）•インタプリタ」とし 
ておきましょう。最初は 「Petty Interprete 
rj としようと考えていたのですが，この 「P 
etty 」 はフランス語かなにかで 「 Petit (プチ）」 
となるという話を間きつけ，耳ざわりのよ 
さを買ってこうしました。頭文字を取って 
「 PI (パイ）」。ちょっと可愛っぽく呼んでや 

ってください。 

この PI を1週間の作業で読んでみましょ 
う。これが今回の「例題」です。 

月曜日:言語仕様の決定 

まず最初に言語としての仕様を決めてし 
まいましょう。先ほども述べたとおり ， PI 
は勉強用ということで，命令体系は BASIC 
の超サブセットとなっています。プログラ 
ム中に使える命令とそのフォーマットは次 
のとおりです。 

LET 変数二式 

GOTO 式 
GOSUB 式 
RETURN 

IF 式1 THEN 式2 


図1 PI のサンプルプログラム 


文字で波を描く 

パスカルの 3 角形 

10 LET S0URCE=12545679 

10 LET N=0 

20 LET MULTI =9 

20 LET K=0 

50 LET FREQ=10 

30 IF N=K THEN 100 

40 LET Uft l JE=S0URCE*MULTI 

40 LET R=K 

50 GOSUB 110 

50 GOSUB 1000 

60 LET FREQ=FRE0-1 

60 PRINT F ； 

70 IF FREQ THEN 50 

70 LET K=k+1 

80 し ET MULT 卜 MULT I+9 

80 GOTO 30 

90 IF MULT I<82 THEN 30 

100 PRINT 1 

100 END 

110 LET N=N+1 

110 LET CHILD=WWE/1 00000000 

120 IF N<11 THEN 20 

120 LET LOOP=4 

130 END 

150 LET UftUE=UAUE/10 

1000 LET BUFF=N-R 

140 PRINT WAME 

1010 LET F=1 

m LET LOOP=LOOP-i 

1020 IF N=R THEN 1100 

160 IF LOOP THEN 130 

1050 LET R=R+1 

170 LET L00P=4 

1040 LET F=F*R 

180 LET WWE=WWE*10 

1050 GOTO 1020 

190 LET UfiUE=UWE+CHILD 

1100 IF BUFF=0 THEN 1200 

200 PRINT WWE 

1110 LET F=F/BUFF 

210 LET L0f ： )P=L00P-l 

1120 LET BUFF=BUFF-1 

220 IF LOOP THEN 180 

1130 GOTO 1100 

230 RETURN 

1200 RETURN 


PRINT 式 
END 

命令の意味についてはいまさら書くまで 
もないでしよう。もちろん実行は RUN です。 
さらに，インタプリタを簡単にするために， 
次のような制約を加えます。 

籲扱える数値は10進数の整数だけです。 

春変数はアルファべットの並びで，頭の1文 
字だけで区別します。たとえば SKYPAR 
K も SCARLET も同じ変数として扱われ 
ます。 

♦式の中の演算子に優先順位はありません。 
したがって1+1 *2 の値は4になります。 

• LET (代入命令）は省略できません。 

參マルチステートメントは使えません。 

• IF 文は式1が0以外なら THEN 以下にある 
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式 2 の値の行に分岐するだけです 。 THEN 

以下に命令を書くことはできません。 

• PRINT 文は式の値を10進数で表示するだ 

けの機能しかありません。 

♦関数などは装備されていません。 

特に4番目の「省略不可能な LET 」 という 
のはかなり凶悪な感じがするかもしれませ 
んが，この制約は，1行のフォーマツトを必 
ず， 

行番号命令く式など（命令はダメ）〉と 
なるようにして，少しでもインタプリタを 
作りやすくするためです。とはいいながら， 
IF 文は少しこの形からはずれています。本 
当は THEN を省略したほうが簡単になるの 
ですが，あまりにも体裁が悪くなるので， 
例外的に1行のなかで命令を2回チェックに 
いくようになっています。 

火曜日:テキストフォーマツトの決定 

これから，いよいよインタプリタの制作 
にかかるのですが，なによりも先にプログ 
ラムを格納しておく形式を考えておかなく 
ては，実行するにしても，どうしてよいの 
かわからなくなります。 

PI では，1行の構造は先頭の2バイトを行 
番号とし，それに続いてその行の文字列を 
格納する領域を固定長で42文字分とってあ 
ります 0 ここに ヌルコード， すなわち“¥ 
0”で終わる文字列を格納しておくわけです。 
この構造はプログラム中は， TEXT という 
構造体で定義しています。行番号を2バイ 
卜に圧縮したのは， エディタ や GOTO など 
の処理で行を見つけるのが楽になるように 
するためです。 

1行が固定長ですので，余ったところが無 
駄にはなりますがその代わり， C の構造体 
力 ? 綺麗に使えるようになります。 

あとは，プログラムの終わりを検出する 
手段が必要です。 PI では行番号で判別する 
ことにしました。入力できる行番号を 0 x 7 f 
ff 未満に制限し， 0 x 7 fff 以との数値が行番号 
として現れたらテキストの終了と見なすよ 
うにします。また， NEW コマンドを実す 
る関数 clear - buffer (リスト1の114:〜）では， 
単純に すべての 行の行番号を MAX-INTVA 
L (プログラム先頭の# deHne により MAX-I 
NTVAL —0 x 7 fff と置き換え定義がなされて 
いる）にすることで， すべてを 最終行の次の 
行番号すなわちテキストエンドにしてしま 
います。 この 方法で NEW を実行するとい 
うわけです。 

このプログラムテキストを表示するのが 
LIST コマンドの処理部である list-print out 


関数です（リスト1の220:〜）。 for 文一発で， 
簡単に済ませています力 5 '，要は行番号が M 
AX - INTVAL 未満だつたら，その値を10進 
数で，さらにその行の文字列はそのままヌ 
ルコードがくるまで表示させるだけのこと 
です。 


また，もし入力された行と同じ行番号が 
あれば，その行を削除してから挿入を実行 
します。入力された行が行番号だけで，文 
字列がない場合には挿入は行いませんので， 
これだけで，挿入，書き換え，削除の3つのす 
ベてに対応することになります。 


水曜日:エディタの作成 


木曜日:式の評価(その 


1) 


昨日，テキストフオーマットを決めまし 
たので今日はエディタを作ってしまうことに 
しましよう。 2本あるリストのうちリスト 
1の PI MAIN . C がエディタ部分です。エディ 
夕では行の入力のほか， 

LIST :テキストの表示 
RUN :実行 

NEW :テキストのクリア 
EXIT : PI を終了する 
の 各コマンドを 扱います。 

main 関数（リスト1の46 :〜）に飛び込む 
と，初めにプログラムをクリアして “* Read 
y ” のメッセージを出してから1行を入力する 
readline 関数 (130 :〜）を呼び出します 。 re 
adline では1行を入力したら，小文字はすべ 
て大文字に変換するなどの加工をしていま 
す。入力された行(テキスト）は line-buffer (42 
:で宣言された char 型の配列）に格納され 
ています。 

次に get - command 関数 (80 :〜）が呼び出 
されます。ここで入力行が先頭の文字から 
チェックされ，数字なら行番号が， LIST な 
どの コマンドなら， その コマンド 番号が帰 
ってきます。行番号は MAX-INTVAL (0 x 7 ff 
f ) 未満の正の数， コマンドの 番号は負の数 
ですので，返ってきた値だけでなんであっ 
たかの区別がつけられます。 

もし，数字だったならプログラムの入力 
ですから, put _ text 関数 （148: 〜）を呼び出 
して1行の入力を行います。 

put _ text では，まずプログラムを格納して 
いる text — buffer (41 :で TEXT という型の構 
造体として宣言されている）を見て.どこ 
に挿入すればよいのかをチェックします。 
行番号は先頭行からだんだん大きくなって 
いきますから， text - buffer の各行の行番号を 
見て入力されたプログラムの行番号以上に 
なったら，そこに入れることになるわけで 
す。 

行番号がそれまで入力されたどの行より 
大きい場合にはテキストの最後は行番号が 
MAX - INTVAL (0 x 7 fff ) で，行番号として許 
される値の最大値より大きいので，自動的 
にその場所，すなわち最終行に追加される 
ことになります。 


言語仕様を眺めていて〈式〉の文字が多 
いのが目につきます。 RETURN 以外のすべ 
ての命令に式がからんでいます。案外気に 
して見ないと気づかないことなのですが， 
この類いの言語では式の扱いが大きなウェイ 
卜を占めているのです。まずは式の処理を 
攻略することにします。今日は括弧の処理 
はとりあえず後回しにして，通常の式を調 
ベてみましょう。まず，典型的な式を書い 
てみましよう。 

2氺 3+4 —B 

括弧の処理を除くと，式は一般的にく数 
値（または変数)〉く演算子〉く数値（または変 
数)〉の並びを延々と繰り返していることが 
わかります。ここで，この処理をどう考え 
ればよいか検討してみましよう。 

PI で扱う演算子はすべて二項演算子，す 
なわち2つの値を入力として，ひとつの結果 
を出力するものです。しかも演算に優先順 
位がありませんから，処理は左から右への 
一方通行で進められます。く値〉く演算子〉〈値〉 
の形を処理し，計算結果をもって，今度は 
く計算結果〉く演算子〉く値〉を計算し，その 
結果をもって……ということを延々と繰り 
返すことになります。 

ただし式の頭だけは特殊で，ここでは演 
算子なしにいきなり出てきた数値を演算結 
果として扱い，その次の演算子の処理に入 
る必要があります。最初のうち，式の頭は 
必ず数値か変数であると仮定して処理を進 
めようとしていたのです力す，式の頭にいき 
なり括弧が出てくる場合があるなど，案外 
いやらしいことがわかりました。この対策 
として今回は式の頭にはいつも“0 + ”が隠 
れている（ダミーの“ 0 + ”）として考えて処 
理を行うことにしました。そこまでの演算 
結果が0で演算子として“ + ”があったよ 
うなふりをして演算を開始するのです。 

たとえば，先ほどの式なら， 
0+2*3+4 -B 

となっていると考えるのです。先頭の値を 
取り込んで演算した結果が，取り込んだ個 L 
そのものになればよいので，1と掛け算を行 
っても構いませんが，この手のプログラム 
で掛け算を使うのはあまり好きでなかった 
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ので 0 との足し算にしました。 

こうしておくと，足し算1回分だけ時間が 
無駄になりますが，処理としては統一され 
た形になり，すっきりとした処理になりま 
す。 

プログラムで，式の処理を行っているの 
は shiki ( U いう関数（リスト2の251:)で 
す。ここでは，そこまでの演算結果を変数 
acca に，演算子は op ， 次の値は accb という 
変数に入力されることにしています。 for ル 
ープに入るところで， acca =0 ，op = OP_P 
LUS とやっているの力 5 '，先ほどの「ダミー 
の〇 + j です。 

さて，ここで先ほどの式の例， 2*3+4- 
B を処理させたとして考えていきましよう。 
いま，式を計算していって2 *3 まで計算力す 
終わったとします。この段階ではプロダラ 
ムでは switch 文 （258 :〜）の直後にいること 
になります。ここで acca には6が演算結果と 
して入っています。 

次に演算子を取り込むのですが，このと 
き取り込んだ文字が演算子でなければ演算 
を終了します。なお，演算子の取り込みは 
get - operater 関数 (325 :〜）で行っています。 
演算子を取り込んだら，今度は for ループの 
先頭に戻ります。演算子があったなら，次 
は数値や変数がくるはずです。そこで get-v 
alue (286 :〜）を呼び出して値を取り込み， 
その値を accb に代入します 0 

値と演算子が決まったので，続いて switc 
h 文で演算子による分岐をして，演算を行い 
ます。 


金曜日:式の評価(その 2) 


今日は括弧の処理を考えてみることにし 
ましよう。括弧が入ると演算の流れが単純 
な左から右へという流れではなくなるため， 
少し気をつける必要があります。 

括弧力 5 '付いた式’というのは， 

2* (3+4)/(6-5) 

のようなものです。人間がやるなら，まず 
括弧の中をすべて計算して， 

2*7/1 


と変形してから計算するという技も使えま 
すが，それをプログラムにするのは少々面 
倒です。 

括弧付きの式を処理するもうひとつの方 
法は，まず （3+4) を計算して，2と桂卜けて， 
それから (6-5) を計算して，割り算をす 
るというやり方です。この場合には “2*” 
まで進んだところで，括弧があ ったら，一 
旦いま持っている “2” とは横に置 
いて，3+4の計算を進め，それが終わった 


時点で，そこで得られた値と先ほどの“ 2” 
と“*”を使って計算することになります。 

言葉で処理を言うと少々面倒なようです 
が，つまり昨日までの式の一般形のく数値 
(または変数)〉のところに，「括弧でくくら 
れた式」が追加されることになるのです。 
この，く数値（または変数）〉を取り込むのは， 
get - value 関数です。ですから，この®;理に括 
弧を見つけたら式の計算を呼び出し，その 
計算値を値として返せばよいことになりま 
す。 

ここで， get-value (286 :〜）を見てみま 
しょう。3つ目の if 文が括弧の処理です。括 
弧があると，現在の注目点を示す textp (テ 
キストポインタ）をひとつ進め， shiki 関数を 
呼び出して括弧の中の値を計算します。計 
算が終わったら，閉じ括弧があるはずです 
ので，とりあえずチェックしてリターンし 
ます。これでめでたく括弧の処理もできる 
ようになりました。 

ところで， get - value は shiki から呼び出さ 
れていたはずです。その get - value が今度は 
shiki を使って値を得ているのです。つまり， 
get - value というクッションが入ってはいま 
すが， shiki が shiki を呼び出して処理をする 
わけです。どこかでこのような話を聞きま 
せんでしたか？そのとおり「再帰」です。 
数学の時間以外はパズルを解くときくらい 
しか縁のなかった再帰ですが，こうしてみ 
ると，ちょっ•とは使えそうな感じがしませ 
んか？ 

土曜日:実行文の処理(その 1) 

いよいよ週末。テキストの入力も，式の 
処理も終わったのであとはいよいよインタ 
プリタ本体です。本体は execute 関数です（リ 
スト2の64 :〜）。最初の while で，最終行に 
〈るまでループするようにしています。次 
に，行の先頭にある命令を取り込み （106 : 
〜の get - statement 関数），その番号に従って 
次の switch で分岐します。 

END 

特に説明するまでもないでしょう 。 END 
AT -- •のメッセージを出して，ステータスを 
TERMINATE にす ることにより while ノレーフ。 
を脱出し，実行を終了します。 

し ET 

exec - let 関数 （129 :〜）で处理します。 
LET は， 

く変数〉=く式〉 

となっていますから，まず変数を識別しま 
す。次は必ず等号がきているはずです，そ 


してその次はお得意のく式〉。式の計算をし 
て，得た値を変数に代入してぃるのが最後 
の return の直前の， 

variable [ var ] =val 
です。 

PRINT 

exec - print 関数 （200: 〜）で处理しています。 
式の値を計算して printf で表示し，もしも式 
の最後が“;”であったならそのまま，違うな 
ら改行してリターンするだけです。 

GOTO 

exec 一 goto 関数 (155 :〜）で実行していま 
す。まず行番号を見つけ，その位置を progra 
m - pointer (55 :で TEXT 型の構造体へのポイ 
ンタとして宣言）にセットします。行番号 
は search - line 関数（リスト1，163:〜)によつ 
て探してきます。プログラムの実行は progr 
am - pointer に従い行っていますので，これを 
書き換えてしまえば GOTO になるわけです。 
IF 

予想されるとおり， exec - if 関数（リスト2 
の166 :〜）で処理しています。 IF 文の書 
式は， 

IF く式1> THEN く 式2> 

ですから，まず shiki を呼び出して式1を計算 
します。その結果が真であれば (if ( value )), 
次に THEN があることを確認してから式2 
の処理ですが，これは GOTO となんら変わ 
るところがないので GOTO の処理をそのま 
ま拝借しています。 

GOSUB 

基本的には exec - gosub 関数 （219 :〜）で 
処理することになっていますが ， GOSUB 
はちょっと厄介です。とぃうのは RETURN 
によって， GOSUB の直後に戻ってこなくて 
はならないからです。この処理のために， 
GOSUB 専用スタック ， exec - stack を設けまし 
た。 GOSUB 命令のあった行の次の行の位 
置を exec - stack に積み， RETURN ではこの 
スタックを掘り返して，そこにジャンプす 
るのです。帰り先をスタックに積むほかは 
GOTO と同じですから，ここでも exec , goto 
を拝借してぃます。 

RETURN 

帰り先をスタックからひっぱり出してき 
て， program-pointer にセットしているだけ 

です。 


日曜日:あなたならど5する 


Oh ! X では安息日は定められて いないの 
で日曜日はデバッグ（丨）となるのでしよう 
か0 プログラムはなるベ〈ややこし〈なら 
ず，それでいてある程度は C らしい小技も 
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/* 正の整数（行番号）の最大値 
/* NEW コマンドのコード 
/* LIST " 

/♦EXIT 〃 

/♦RUN ” 

/* テキストの一行の長さ 
/* テキスト•バッファの行数 


本/ 

*/ 

*/ 

*/ 

本/ 

本/ 

本/ 

本/ 

本/ 

*/ 

*/ 


/一 - -■ 
- p I • 

• • プチ•インターブ 
コマンド処理部 

リタ - 

#define 

EOS 

,¥0, 

#define 

ERROR 

-1 

#define 

READY 

0 

#define 

MAX INTVAL 

0x7fff 

#define 

CMD NEW 

-10 

#define 

CMD LIST 

-11 

#def me 

CMD EXIT 

-12 

#define 

CMD RUN 

-13 

#define 

LINE LENGTH 

40 

#define 

MAX LINE 

25 

struct CMD_TABLE { 



char *cmd_stnng ； 

int cmd_number ； 

} command_table[] = { 

” NEW” ， CMD_NEW, 
"LIST” ， CMD_LIST, 
"EXIT",CMD_EXIT, 
"RUN" ,CMD_RUN, 

"”，ERROR " 

}； 


本ランゲージ•シリーズでは上の structCMD_TABLE をこれと差し換えてね 
* 

本 char <comd_string[ 5 ] ; 

* int comd_number[5 ]； 

*/ 


struct TEXT { 
short 

/* 

* ランゲージ 
寒 int 

本/ 

char 


line number ； 


シリーズ 
line_number; 


line_text[LINE_LENGTH+2 ]； 


struct TEXT text 
char line_buffer[LINE_ 
char *line_pointer ； 

int text_lines; 


_buffer[MAX_L 

line_lengthT ； 


LINB+1 ]； 


main() 


command_number ； 


int 

/* 

* ランゲージ*シリーズ用の追加 
* init_table () ； 


*/ 


/* 

/* 


テキストの構造は 
2 バイトの行番号と 


*/ 

本/ 


それに嫌く文字列の並び */ 
( 固定長としている）である */ 

実»にブログラムが格納される */ 
キーボードからの 1 行分のバッファ */ 
入力行の进理に利用する */ 
現在まで入力された行数 */ 


clear_buffer () ； 
for (7；) I 

printf(" 京 Ready¥n">; 

if (!readline(1ine_buffer,LIHB_LBNGTH)) 
print 企 （"Input Error !¥n ,f )； 
return(ERROR )； 


/* ゴミが入っていると好きくないのでクリア */ 


line_pointer = line_buffer ； 

command_number = get_conunand( ) ； /* コマンド番号が 0x7fff 以下の正数なら行番号 */ 

if ((command_number >=0 ) kk (command.number < MAX_INTVAL)) 
put_text(command_number,line_pointer )； 

else { 

switch(command_number) { 

case CMD_NBW : clear_buffer ()； 

break : 
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23 
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6 3 

64 

65 

66 
67 


入っているようにということで，いろいろと 
悩みつつ，一気にデッチあげました。いき 
なりインタプリタですから， C を覚えたて 
の方には少々難しかったかもしれません力 ? ， 
自分でぼちぼちとプログラムを作っていく 
ようになれは' それほど苦労しなくても読 
み切れると思います。 

入力に当たっては， XC や MS - DOS 上で動 
くまっとうな C コンパイラなどを使う場合 
にはそのままでよいのです力 5 '，シャープの 
ランゲージシリーズ ( aC ) を使う場合には 
少々手直しが必要です。 

まず，コメントやメッセージの中にある 
漢字はコンパイラが誤解するので，取り払 


います。さらに，ランゲージシリーズでは 
構造体の配列が使えなかったので，ばらば 
らの配列に変更しています (struct CMD.T 
ABLE のところ）。これに伴ってこの構造体 
へのアクセスを行っている部分を変更しま 
す。これらについては，リストの中でコメ 
ントで入れてあるので，よく見ながら変更 
してください。 

さらに，ランゲージシリーズではどうし 
たわけか変数の extern 宣言がうまく使えませ 
んでした（私が悪いのかもしれないが)。こ 
れでは，エディタと実行部分でプログラム 
の バッファが 共有できないので， ファイル 
の分割がうまくできません。しかたがない 

リスト1プチ•インタブリタ Pl ( pimain . c ) 


ので，ファイル2本をまとめて1本にして 
からコンパイルしてください。 

本 ** 

最後に， PI 自身は本当に骨のような部分 
だけしかなく，命令の追加もやりやすくな 
っていますので，このまま拡張していって 
自分専用のインタプリタにするのもよいで 
しよラ。 

また，処理速度についても中間コードを 
使ったり，関数へのポインタを使って一気 
に分岐するなど，まだ改良の余地がありま 
す。慣れてきたら，そちらに手を加えたり 
するのも面白いと思います。 

それではご健闘を。 
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123 

124 
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clear_buffer() 

{ 

int i; 

for (i=0; i <=MAX_I.TNE ； i++) 

text_buffer[i].line_number = MAX_INTVAL ； 
text_lines = 0; 


/* ***** 棵準入力からの一行読み込み ***** 

* 後の処理が簡単になるように、小文字は全て大文字に変換し、 

* さらに、行の最後の改行コードは取り払い、 EOS コードを入 

* れるようにしています。 

*/ 

readline(buffer , size) 

char ^buffer ； 

int size ； 

( 

int status ； 

char *c ； 

status = gets(buffer, size )； 
for ( ； 本 buffer > 0xf ； buffer++) 

本 buffer = toupper ( 拿 buffer}; 

♦buffer = EOS ； 
return(status); 


/* ***** テキストの押入 ***** 

* 入力しようとする行の行番号をテキストバッファから捜し、 

* 一致するものがあればそれをいったん削除してから挿入します。 
♦/ 

put_text(Inumber , input_text) 


int 

丄 number ; 

char 

*input_text ； 

int 

1ine_counter 


lme_counter = search_line(1 number )； 

if (text_buffer[Line_counter].linenumber ==lnumber) 
delete_line(rine_counter )； 
insert_line(line_counter,lnumber,input_text); 


***** 行の検索 ***** 

テキストバッファを最初からめ、与えられた行番号 （ n 〉 以上の 


liat_printout() : 
break ; 

printf("Bye...¥n M )； 
return(READY )； 
execute ()； 
break; 

printf (’TCommandYn" }; 


* line_pointer の指す先からの文字？！のチエツクを行う • 

* 数字ならば、行番号と見なし、違うならコマンドテーブル 

* ( command_table) から一致するものを 搜 しにいく * 

拿 そんなコマンド無いわい！というときはエラーコードを返す • 

* ほいほい。 

*/ 

get_command() 

{ 

int i,aata; 

char 拿 c, 拿 d; 

d = skipspace(line_pointer )； 
if ((*d >= 1 0 *) && (*d <= ’9’ > > { 

for (data=0 ； (*d >= ’0’）&& (*d <= 1 9' ) I ) 
data = data * 10 + *d - 1 0 *； 
if ((data <= 0) || (data > MAX_INTVAL)) 

return( ERROR )； 
line_pointer = d; 
return(data); 

} 

for (i=0 ； *(c = coramand_table[i 】 .cmd_string} != BOS ； i++) { 

/* ランゲージ • シリーズ免 for (i=0 ； *(c = co*d_string[ i]) != EOS; i + +) { */ 
while (( 拿 c != EOS) tk (*c == *d)> { 

C + +； 

d ++； 

) 

if (*c == EOS) { 

line_pointer = d; 

return(commandltable[ i ] . cmd_number) ; /* ランゲージ • シリ — X return (comd_number [ i ]) ； 本 / 


return(ERROR )； 


case CMD_LIST ： 

case CMD_BXIT ： 

case CMD_RUN : 

default : 

} 

} 

京 **"* コマンドのチェック拿 **** 
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t_l ine (n) 

int n; 

struct TEXT * text ； 
int i; 

for (i = 0,text = text_buffer : text->line_number < n; i + +, text++ ) 



return(i); 


/* 

家 
本 
本 

本/ 

delete_line( 1 ine_counter) 

mt line counter : 


***** 行の刖除 ***** 

テキストバッファ上の行数 （ line_counter> をもらい、その行を削除します。 
要は、その行以降の行を一つづつ引き上げ、今まで最後だった行については、 
行番号を MAX_INTVAL にするだけですが • • • 。 


/* 

拿 

* 

本 

本/ 


for ( ； line_counter < MAX_LINE- 1 ； 1 ine_counter++) { 

text_buffer[line_counterj.line_nuraber = text_buf fer[line_counter+1].line_number ； 
sprintf(text_buffer[line_counter].1ine_text,text_buffer[1ine_counter+1].line_text); 

} 

text 1ineH --； 

text_buffer[iine_counter 】 .line_number = MAX_INTVAL ； 

***** 行の挿入 ***** 

テキストバッファ上の行数 （ line_counter) をもらい、そこに一行 
(行番号は lnumber 、 中身は text ) を挿入します。行をずらして、 
sprintf ではめ込むだけのことです。 


insert_line( 1 ine_counter , lnumber , text) 
int lme_counter,inumber; 

char *text ； 

{ 

int tail; 

if (text_lines < MAX_LINE) { 
if (8trlen(text)) { 

for (tail=MAX_LINE; tail > line_counter; tail--){ 

text buffer[tail 】 .line_rumber = text_buffer[tail-1].line_number ； 
sprintf(text_buffer[tai1].line_text, text_buffer[tail-1].line_text )； 

} 

text_lines++; 

text_buf f er[1ine_counter].1ine_number =lnumber; 
sprintf(text buffer[line_counter].line_text, text )； 


else . 


printf("Sorry.. I can’t eat so much text!¥n ")； 


/* 
t 
* 

*/ 

list_printout( ! 


***** プログラムリストの表示 ***** 

リストを表示します。例によって行番号が MAX_INTVAL になったら， 
の最後と見なして終了します。 


テキス 


struct TEXT *p ； 
char *c; 

int number; 

for (p = text_buffer ； (number = p->line_number) < MAX_INTVAL ； p++ 
printf("XdXsYn",number,p->1ine_text); 


***** スペースのスキップ拿 * 本拿 * 
(ペースやタブを嫌み飛ばします。 


tipspace(p) 
char 




while ((*p == 

P ++； 

return(p); 


II (*P 




，本 

* ランゲージシリーズ用の追加 
* 

* init table() 


comd_atring[ 0 】 
comd_stnng 1 1] 
comd_string[2] 
comd_string[3] 
comd_atring[4] 
comd_number[0] 
comd_nuraber[1] 
comd_number[2] 
comd_numberl3] 
comd_number[4] 
init_exec(); 


"NEW"; 
"LIST"; 
"EXIT"; 
"RUN "； 

" ¥0 ，，丨 
CMD_NEW ； 
CMD_LIST ； 
CMD_EXIT ； 
CMD RUN ； 
ERROR ； 


*/ 
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►尨俏者の 皆様は X68000 の瞄 人に 苦労な さっているよ うです 力へ うちの嫁さん は 私と 一緒 
になってパソコンシヨップで 粘る こと 4 時問。サービスにサービスをつけさせて，ついでに 
ボーナスの 半分を支払ってく れる ことにな りました。 ばか あ一幸せもんだ……。 

佐藤啓市 （ 33 ) 北海逍 
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- p I * • . ブチ.インターブリター 


- 

実行処理部 


#define 

EOS 


#def me 

TAB 

, ¥t » 

♦define 

FALSE 

0 

#define 

TRUE 

1 

#define 

READY 

0 

#define 

ERROR 

-1 

#define 

TERMINATE 

1 

#define 

LINE LENGTH 

40 

♦define 

MAX LINE 

25 

#define 

MAX INTVAL 

0x7fff 

♦define 

OP PLUS 

1 

#define 

OP MINUS 

2 

♦define 

OP MUL 

3 

♦define 

OP DIV 

4 

♦define 

OP EQUAL 

5 

#define 

OP HI 

6 

♦define 

OP LO 

7 

#define 

STATE LET 

1 

♦define 

STATE~IF 

2 

#define 

STATE THEN 

3 

♦define 

STATE GOTO 

4 

#define 

STATE GOSUB 

5 

♦define 

STATE RETURN 

6 

#define 

STATE PRINT 

7 

#define 

STATE END 

8 

♦define 

STACK SIZE 

10 


int exec_stack[STACK_SIZE ] ； 

int stack_pointer ; 

int terminate; 

int variable [ 会 6]; 

char *textp; 


TEXT { 

short 

char 


line_number ； 
line_text[LINE_LENGTH+2 ]； 


/* テキストと命令テーブルの構造 */ 

/* CMD.C のところで頑張って香いたからそちらを見てね 


本/ 


CMD_TABLE { 
char *cmd_stnng ； 

int cmd_number ； 

} statements[] = { 

"LET",STATE_LET, 

'•IF" , STATE_IF, 

M THEN",STATE_THEN, 
"GOTO",STATE_GOTO, 
"GOSUB” ， STATE_GOSUB, 
"RETURN",STATE_RETURN, 
"PRINT",STATE_PRINT, 
"END",STATE_END, 

"",ERROR 


/* ランゲージ•シリーズ */ 
ft char *state_string[9 ]； */ 
/* int state_number 19 ]； */ 
/* ~ */ 
/* */ 
/* */ 
/* 本/ 
/本 */ 

It */ 
/* */ 
/* */ 
/* */ 
/本 本/ 


extern struct TEXT text_buffer []； 
struct TEXT 本 program_pointer; 


/* ランゲージ•シリーズの時はこれを削除します */ 
/* 現在、どの行を実行しているのかを指し示すポインタ 


本/ 


execute() 


実行ルーチン：はじまりはじまり 


int status , i ; 

terminate = FALSE; 
stack_pointer = STACK_SIZE ； 
program_pointer = text_buf fer; 
status = READY ； 

while ((program_pointer->line_number < MAX_INTVAL) && (status == READY)) { /* 

i = get_statement(program_pointer->line text )； 
switch Ti) { 

case STATE_LET : 


/* あれやこれやの初期化 */ 


テキストの終わり （ MAX_INTVAL 以上の 
行番号）に来たらおしまい ）*/ 


if ({status = exec_let()) == READY) 
program_pomter++; 

break; 

case STATE_IF : status = exec_if ()； 

break ； 

case STATE_GOTO ： status = exec_goto ()； 

break ； 

case STATE_GOSUB : status = exec_gosub(); 

break; 

case STATE_RETURN : status = exec_return ()； 

break; 

case STATE_PRINT : if ((status = exec_print()) =- READY) 

program_pointer++; 

break; 

case STATE_END : printf("<END at [Xd]¥n",program_pointer->line_number); 

status = TERMINATE ； 
break; 

default : printf ( , '??Stateraents¥n"); 

status = ERROR; 


if (status == ERROR) 


/* エラーのあつた行を表示して終了 */ 


► 渡辺美里がアイドルでないと思っている読者諸氏へ。いまはロックで売っているけど， 

前はミスセブンテイーンからスクールメイツに入っていたことを隠しているのは，どうも 特集プチ•インタプリタを作ろう 79 

私にはいただけません。 佐藤正貴 （ 18 ) 干葉斟 
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E N の処理 ***** 

ら式 2 の行へ痳ぶ。 

ろが、昔の BASIC つぼい、レトロ感覚である。 


exec_n () 

{ 

int value ； 

textp = skipspace(textp )； 

value = shiki(); 

if (terminate) 

return(ERROR )； 
if (value) { 

textp = akipspace(textp )； 
if (get_statement(textp) != STATE_THEN) 

—printf ("THEN がありません 
return(ERROR )； 

) 

return(exec_goto ())； 

} 

else program_pointer ++； 
return(READY )； 


/* ***** PRINT ***** 

* PRINT 式 式の値を表示して改行する 

* PRINT 式； 式の谄を表示したあと、改行しない 

本 

* . おまけ . 

* 殺している WHILE 文を復活させると、次のような書き方もできるようになる。 

本 

* PRINT 式 1 式 2 式 3 .， 式 1 の值を表示したあと、改行して式 2 、式 3 の値を表示する 

* PRINT 式 1 、式 2 、式 3 •• 〃 改行せずに式 2 、式 3 の傕を表示する 


► m 村さん，$は僕もモデル1〇ユーザーだったのです。苦しい屯活のなかでやっとデ イス 
1988.7. クを n うだけのお金がたまったときはたと铽がついたのです。……こ，これは ，XI turbo 

II が n えるのではないか，と。视在， m は XlturboZ のユーザーです。なにかうしろめたい 
ものを感じながらも，楽しい生活を送っています。 八鸹秀治 （17) 榀岡 W 


/» 式 1 本 / 

/本 T H E N */ 

/* 式 2 に飛ぶ */ 


本/ 

get statement(string) 

char 本 string; 

{ 

char *c,*d; 

int i; 

string = skipspace(string )； 

for (i=0 ； *(c = statementsii 】 .cmd_string> != EOS ； i++) { 

/* ランゲージ • シリーズでは for ( i = 0 ； * (c = comd—string [ i ] > 
for (d=string；(*c != EOS) && { 拿 c == *d) ； c++,d++) 


EOS ； i++) 


*/ 


if («c == EOS) { 

textp = akLpspace(d )； 

return ( s tatements[i]. cmdnumber) ； /* ランゲ . 


ジ • シリーズでは return (state_number[ i] > ; */ 


return(ERROR )； 


/* ***** 代入文の処理 ***** 

* 代入文は変数 = 式の形である。 

» (こんな風に害くと偉そうでしよう？） 

本/ 

exec let() 


int var,val; 

textp = skipspace(textp); 
if (( 拿 textp < * A*) | ! (*textp > * Z 1 )) 
printf (" 変数が必要です ¥n” > ; 
return (ERROR )； 

var = 拿 textp-*A*; 
textp = skipalpha(textp); 
textp = skipspace(textp )； 
if (*textp++ != ，=，} { 

printf (" 等号が必要です ¥n" > ; 
return (ERROR )； 

} 

textp = skipspace(textp )； 
val=shiki ()； 
if (terminate) 

return (ERROR )； 
variable[var 】 =val ； 
return(READY )； 


/» 変数 */ 


/* = */ 


/* 式 */ 


/* 

本 
*/ 

exec_goto() 


本 ** 本 * G O T O (0 50 ； a 家 **** 

GOTO 式の形で、式の ® が行番号になる , 


int n ； 

textp = skipspace(textp )； 
n = search_line(shiki ())； 
if (terminate) 

return(ERROR}; 

program_pointer = text_buffer+n; 
return(READY )； 


/* 式の值を行番号として該当する行を捜してくる 
/* 式に誤りがあれば勿綸、エラー 


*/ 

*/ 


/* ブログラム • ポインタをセットすればジャンプしてくれる */ 


printf( ' [%d%s]Vn" , program_pomter->1ine_number,program_pointer->line_text )； 
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ちょっと注意。 
を呼び出して 


ネ韋本本本 

ック （ exec_stack 丨に稽み上げる他は 


int value ； 

char c ； 

value = 0; 
c = <textp; 

if ((c >= , 0 , ) && (c <= , 9 , ) ) { /* 数値 */ 

for (;；c = *++textp) { 

if ((c >= ) && (c <= '9*)) 


exec_return() 

{ 

if (stack_pointer >= STACK_SIZE) { /* 念のためにチェック 本 / 

printfT 戻り先がありません ¥n") ; 
return(ERROR ) ； 

} 

program 一 pointer = exec_stack [ stack_pointer++] ； /* スタックからひっぱり出して program_pointer にセット 

return (READY) ； /* めでたしめでたし 


/* 本本*♦本本本本♦本本*本本本本本本本 it (0 tt W ^ * 本*本本本*本*本**:»：本*拿本*本*/ 

shiki() 

{ 

int acca , accb,op,stat; 

for (acca = 0,op = 0P_PLUS,stat = READY ； (stat == READY) && !terminate ；) 【 
accb = get_value ()； 
switch(op) { 


case 

0P_PLUS : 

acca += 
break; 

accb; 

case 

0P_MINUS ： 

acca -= 
break ； 

accb ； 

case 

0P_MUL : 

acca *= 
break ； 

accb ； 

case 

0P_DIV ： 

acca /= 
break; 

accb; 

case 

0P_EQUAL : 

acca = 
break; 

(acca == accb); 

case 

0P_HI : 

acca = 
break ； 

(acca > accb); 

case 

0P_L0 : 

acca = 
break; 

(acca < accb )； 

default 


terminate = TRUE ； 

printf("Operater errorVn" 


op = get_operater(&stat); 

} 

if (stat != TERMINATE) { 
terminate = TRUE ； 
printf("??ERR0R¥n ")； 
return(-1 )； 

) 

return(acca )； 


exec_gosub() 

{ 

if (stack_pointer <= 0) { /* スタックのチェックをして ... */ 

printf (" ネステイングが深すぎますれ"）； 
return(ERROR) : 

} 

exec stack [--stack pointer ] = ++prograra_pointer ； /* 播り先（次の行）をスタックに積んで . */ 

return (exec_goto( ) ) ; /»GOTO をそのまま拝借！簡単！簡単 ！*/ 


本 / 

exec_pnnt () 


/* 


textp = skipspace(textp) : 
printf ("X5d，.，shiki ()); 

while{!terminate && ((* textp == ',') II (*textp == 
if ( 本 textp =='') 

printf r¥n -')； 

textp = skipspace(++textp )； 
printf {"%5d..，shiki ⑴； 

} 
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► 6 月号の質問筘にあった中谷さんにひと言 0 BASC 0 M で漢字を使うにはコンソール関 
係をすべて自作のマシン語ルーチンにして CALL 命令で呼び出せばよいと思います。実際， 
私はそうやっていますから。私の持っている BASC 0 M ではライブラリにあるコンソールモ 
ジュールをかなり押き換えないとマスクがはずれないようです。沼野 m (23) 柬京都 
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300 

value = value 本 10+c- ， 0 *; 




301 

else break; 




302 

} 




303 

return(value )； 




304 

} 




305 

if ( (c >= 'AM && (c <= , Z , ) ) ( 

/* 

変数*/ 


306 

textp = skipalpha(textp) : 




307 

return(variable[c - r A 1 ])； 




308 

} 




309 

if (c == MM { 

/* 

括弧*/ 


310 

textp++; 




311 

value = shiki(); 

/* 

式を計算して ♦ • 

*/ 

312 

if ( 本 textp != MM { 

/* 

勿論、括弧は閉じて 

いなければいけない 

313 

terminate = TRUE; 




314 

printf (” 括弧の数が合わないと思うのですが.. .¥n”>; 


315 

return(ERROR) ; 




316 

} 




317 

textp++; 




318 

return!value); 




319 

) 




320 

terminate = TRUE ； 

/* 

それ以外なら エラー 

*/ 

321 

printf 《"数値の答なんですが • . 




322 

return(ERROR )； 




323 

} 
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/* 


*/ 


***** 演算子の取り込み ***** 

’ ； ’ で終了させるのは、 PRINT 命令で使うため（式の最後が 


，でも 


なら改行しない ) 


get_operaterI status) 

int ^status; 


で数値の連铳表示ができるパツチに対応させておくため 


int operater ； 

♦status = READY ； 
switch(*textp) { 
case 

case 


case 

case 

case 

case 

case 


TAB 

EOS 


operater = OP_PLUS ； 
break; 

operater = OP_MINUS ； 
break; 

operater = OP_MUL ； 
break ； 

operater = OP_DIV ； 
break ； 

operater = OP_EQUAL ； 
break; 

operater = OP_HI ； 
break ； 

operater = OP_LO ； 
break; 


本 status = TERMINATE ； 

printfC 演算子がおかしいように思うのですが 
^status = ERROR ； 
return(ERROR )； 


¥n M )； 


if ( 本 status == READY) 
textp++; 

return(operater )； 


/* 

* 

*/ 

skipalpha(p) 

char 


***** アルファぺット文字（大文字）のスキップ ***** 
変数名に冗長を許したりするために作っておいた 


*P; 


while ((*p >= f A*) && (*p <= ’Z’>) 
P ++； 

return(p )； 


/* 

* ランゲージ•シリーズ用の追加 

本 


*init_exec() 

*{ 

* state_string[ 0 ] = 

家 state_string[lJ = 

* state_string[2]= 

* state_string[3 】 = 

* state_string[4 】 = 

* state_string[5]= 

本 state_string[6]= 

本 state_8tring[7]= 

* 3tate_atring[8]= 

* state_number[0]= 

* state_number[1]= 

* state_number[2]= 

* state_number[3]= 

* state_number[4]= 

* atate_number[5]= 

* state_number[6】= 

* state_number[7]= 

* state_number[8]= 

* } 

*/ 


"LET "； 

"IF"; 

"THEN "； 

"GOTO"; 
"GOSUB "； 
"RETURN"; 
'•PRINT "； 

"END "； 

，•¥ 0”； 

STATE_LET ； 

STATE_IF ； 

STATE 一 THEN; 
STATE_GOTO ； 
STATE_GOSUB ； 
STATE_RETURN ； 
STATE_PRINT ； 
STATE_END ； 
ERROR ； 


本/ 
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•特集 

実践 


言語からの誘惑 


XBAS to C の正しい使い方 


MUrata Toshiyuki 

村田敏幸 


XC には XBAS toC という秘密兵器が隠されています。 X - BASIC のプログラムを C のソー 
スに変換してコンパイルできるわけですが，正しく使って BASIC コンパイラとして活用す 
るには，まず C と BASIC との性格の違いを理解することが大切のようです。 


みんなも知っているように X - BASIC は C 
言語に近い制御構造を持っという意味で C 
とはかなり微妙な関係にある。この微妙な 
関係に拍車をかけるのが C compiler PRO - 
68 K (通称 XC ) を買うとくっついてくる XB 
AS to C コンバータ （ BC ) の存在だ。 

BASIC で書いたプログラムも BC を通せば 
C のプログラムに早変わりだ0 C に変換し 
てしまえばこっちのもんで，最初から C で 
書いたプログラムと同じように コンパイル 
すれば実行ファイル（. X )ができあがる 0 
• x = マシン語の プロ グラムということだか 
ら， BASIC インタプリタがなくても実行で 
きるし，なにより速い。 BASIC インタ プリ 
夕上では遅くて使いものにならなかったよ 
うなプログラムもコンパイルすればビュン 
ビュン走る。今まではまともなプログラム 
を開発するにはマシン語なり C なりを覚え 
なければならなかったけれど， BC (を含む 
XCo 以下同様）を使えば僕らのいちばん身 
近にある言語， BASIC で「開発 J が行えてし 
まうのだ。 

手順も至って簡単で，たとえば testbas と 
いうプログラムから test . x を作るにはコマン 
ド モー ドで， 
cc test.bas 

と打ち込むだけでいい。 

こ の CC というのは コ ンパイルドライパ、と 
呼ばれるプログラムで， CC のあとに続けて 
BASIC のファイル名を書けば C への変換， 

コン ハ。イル，アセンブル，リンクという手 
順を自動的に行ってくれる。念のためだけ 
ど， CC 自体がコンパイルしたりアセンブ 
ルしたりといった機能を持っているわけじ 
やなく， CC は C コンパイラやアセンブラな 
んかを呼び出すだけの仕事しかしていない。 
だから「ドライバ、」というんだけど，これ 
は觉えてくれなくても いい。 とにかく ，X 
C はあまり C を知らない人にも BASIC コン 
パイラ感覚で使うことができる便利なツー 
ルだってことはわかってもらえたと思う。 

ここまでは，なんだかとってもおいしそ 
うな話で， 「 C はちょっと…… j と尻ごみし 
ていた人も XC がほしくなったんじやないだ 
ろう力、。実際， XC を買った人の何割かは B 
ASIC フ。ログラム を C に 変換す る 機能が目 当 


てなんだろうね。けれども，うまい話には 
落とし穴があるのは世の常だ。 BASIC コン 
パイラを買ってきたつもりで XC を使うと石萑 

実にハマる。 

やってみた人にはわかると思うけれど， 

「インタプリタで動作力1 萑認されていて， 

C にもすんなり変換できて， コンパイル， 
アセンブル，リンクも エラーな しで通った 
にもかかわらず，最終的に得られた . x ファ 
イルは正しく動作しない」ということもあ 
る。こうなってしまうと， C について詳し 
くない人にはもうどうすることもできない 
わけだよね。 

やっぱり C を覚えなければいけないんだ 

う力、，と，不安になった人もいると思う。 
I にも考えないよりはちょっとぐらい謙虚 
なほうが僕は好きだけど，はっきりいって 
BC を使うだけなら C を覚える必要は全然な 
い。いくつかのことを「体で覚えて」それ 
を守れば， C を知らなくても BC を使うこと 
はできるんだ。この際，理屈はあと回しで 
もいいことにしよう。気になる人は自習し 
てちよう AT い。 

マクラが長くなったけど，そんなわけで 
以下， X - BASIC + BC でプログラムを作る 
うえでの注意点をなかば対症療法的に書い 
てみる。 

あくまでも〇コンパイラ 

最初に少々おせっかいだけれど，心構え 
(重い言葉だね）の話から始めよう。上でも 
チラチラ書いたように 「 BC は BASIC コンパ 
イラのようにも使えるけど，決して BASIC 
コンパイラではないんだ」ということを頭 
に入れておいてほしい。一度 C に変換され 
てからコンパイルされるのだということを 
忘れてしまうと思わぬバグを生む結果とな 
るからね。 

そもそも， X - BASIC がどんなに C に似て 
いるように見えても，結局は BASIC なんだ。 
さらに， BASIC と C の違いに加えて，イン 
タブリタとコンパイラという実行方法の違 
いが加わるから話は複雑になる。 

BASIC インタフ。リタはかなり ルーズな言 
語処理系だ。よくいわれるのはデータの型 


の区別が（あまり）ないという点で， X-B 
ASIC の場合は結構データ型にはうるさいほ 
うなんだが，それでもルーズなことには変 
わりない。たとえば，実数の引数を取る関 
数に整数を渡すことができてしまう。この 
場合インタプリタは「あれ？引数は実数 
のはずなんだけどなあ。しかたがない。私が 
骨を折りましょ」と，実数に変換してから 
関数に渡すので，ちゃんと望むとおりの結 
果が返ってくる。ユーザーはちょっとぐら 
いルーズでも構わない。 

対して C コンパイラはまた別の意味でル 
ーズだ。やはり，実数を引数に取る関数に 
整数を渡すことができる。が，型の変換な 
んかはしないで，そのまんま関数に渡して 
しまう。弓 I 数を受け取る関数側では渡され 
たのは実数だと思って処理をするから，ど 
んな結果が出るかは見当もつかない。コン 
パイラが ルーズな わけだ。 

たったこれだけを見ても， BASIC インタ 
プリタと（デコンパイラとの間には暗くて深 
い河があるのがわかるというもの。そのへ 
んを踏まえて以下を読んでほしい。 

見た目はすんなり通るけど…… 

さて，もっとも多くの人が落っこちても 
がいていると思われる落とし穴が，何を隠 
そう，前項で例にあげた関数の引数の問題 
だ。この問題のやっかいなところは，コン 
パイル （ C へのコンバートを含む。以下同 
様）は見たところ正常に行われるという点 
にある。 

例をあげよう。 X - BASIC 上で2つの数の 
大きいほうを返す関数 max を作ったとする 0 
く例1> 

1000 func float max ( ajfloat , b ; float ) 
1010 if ( a > = b ) then return ( a ) 
1020 return ( b ) 

1030 endfunc 

引数も返り値も実数型になっているのが 
ポイントで，この関数をインタプリタ上で 
使う分には，引数に整数型の値を与えても， 
もちろん実数型の値を与えても正しい答え 
が返ってくる。たとえば， 

100 int i=5,j = 6,k 
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110 k = max ( i ， j ) 

とすれば， k にはちゃんと 6 が代入される。 

ところが'，これを コンパイルして みると， 
突拍子もない答えが返ってきて驚くことに 
なる。すでに述べたように X-BASIC インタ 
プリ タ では関数側で宣言された仮引数の型 
に実引数の型を合わせてくれるが， C では 
関数呼び出しの際に型の変換を行わないか 
らこういうことが起こるわけだ。 

この例では仮引数を実数型で宣言してお 
きながら，整数型の変数を渡すという単純 
なミスだった。ちょっと注意すれば未然に 
防げるバグといえる。では，これはどうだ 
ろぅ。 

100 float f，g 

110 g = max ( f ，3) 

一見正しいプログラムに見える。力 ? ，し 
かし，このプログラムを コンパイル してみ 
るとやっぱり変な答えが返ってくる。なぜ 
かというと，ポコンと書いた3という数が '! g 
数とみなされてしまうからなんだ。 

思い出してほしい。 X-B ASIC では数値は 
特に指定されていなければ整数として扱わ 
れるのだった。これは C でも同じだ。イン 
タブリタ上では例によって型変換をしてく 
れるからこのことは表には出てこない。で 
も BC で C へ変換するとやっぱり整数なわけ 
だから，ちゅど一んしてしまう。 

この場合， 

110 g = max ( f , 3 # ) 

と書いておけば， BC にも実数だというこ 
が伝わるから，実数として扱われるよう 
コンバー トしてくれる。 

この応用というか，裏技みたいなものだ 
が，実数を受け取る関数に整数型の変数値 
を渡すときには， 

キャスト 演算 

異なる型の変数を混在して扱いたい場合， C 
ではキャストという手法を使うことで，型を強 
制的に変更することができる。く例1>の場合だと， 
k=max((double)i, (double)j); 

とすれば，関数には実数に変換された値が渡さ 
れる。また，最新の ANSI 仕様では関数のブロト 
タイプ宣言というのが導入されていて， double 
max (double, double) :という宣言をあらかじめ 
(この間数を使う前に）書いておけば， max の引数 
が double 型(倍精度実数型= X-BASIC の float 型） 
かどうかをコンパイラがチェックしてくれるよ 
うになる。 

XC は 「ANSI 仕様も取り入れた最新バージョン 
(シャープの広告によると）」で，プロトタイプ 
宣言もサボートされている。にもかかわらず， 

BC はプロトタイプ宣言はおろか，キャストさえ 
してくれないんだから悲しい。なんとかバージ 
ヨンアップしてもらいたいものだ。 


110 k = max ( i +0#， j +0#) 

のように書いておけば， コン ハ 0 イ ルの 際に 
U を実数に変換してくれるようになる。こ 
れは型の違う値同士の演算のときには高い 
ほうの型に変換されるという C の规則を利 
用したものだ。もっとも，みっともないか 
らあんまり多用は勧めないけどね。逆に整 
数を受け取る関数に実数を渡すときには素 
直に int 関数を使えばよい。 

なお，ここに書いたことは ユーザー 定義 
関数だけではなく，システムがもともと持 
っている関数にも当てはまる。特に危ない 
と思われるのが， sgn と abs で，どちらの関 
数とも引数，返り値ともに実数型だ。僕も 
前に整数の符号を調べようとして引っ掛か 
ったことがある。 

ところで，「型の違う変数間の代入はどう 
なんだ」と不安に思った心配性の人もいる 
かもしれないので補足しておくけど，いか 
に C が不親切とはいえ，代入のときは自動 
的に型変換を行ってくれる。 

だから， 

100 int i =5 
110 float f 
120 f=i + 0# 

なんてことはしないで，ただ， 

120 f = i 

と書けば，コンパイルしても f には実数の 
5が代入される。念のため。 


C は BASIC と比べるとデータ型の種類が 
ずっと多い。ところ力 ? ，面白いことに BASI 
C にはあるのが当たり前なのに C にはない 
データ型もある。文字列型がそうだ。 C に 
は文字変数というものが存在しない。ただ 
文字列が扱えないかというと，そうじゃな 
くて，文字列は char 型の配列という形で表 
すことになっている。配列だから代入をし 
たければ配列の.各要率をそれぞれ代入しな 
ければならない。これではあまりに面倒な 
ので，実際には文字列をコピーする関数が 
用意されている。 BC はこのへんのことを踏 
まえて，文字列の代入が出てきたら文字列 
をコピーする関数を呼び出すような C プロ 
グラムに変換す‘わけだ。文字列の連結や 
部分柚出も同じように処理される。 

というわけで，文字列の扱いについては 
C へコンバートするからといって特に気を 
つかう必要はない。もちろん，これはイン 
タプリタ上で_作を確認してあればの話。 
ろくにデバッグもしていないと，なにかの 
勘違いで， 


100 int i 
110 str s 

1000 i=s 

なんて部分があったりするかもしれない。 
これをいきなり C にコンバートしたとする 
と， char 型の配列を整数型の変数に代入す 
るというわけのわからないプログラムにな 
ってしまう。 C ではこんなことをしてもよ 
<って（少なくともしち やい けないことは 
ない），今の例では char 型の配列 s の先頭ア 
ドレスが i に代入される。チョンボと紙一 
重なのだが，こういうことをすることもあ 
るのだ。くれぐれも，インタプリタでデバ 
ツグしてないプログラムをコンパイルする 
のはやめようね。 

あ，忘れるところだった。 X - BASIC では 
許されて C では使えない文字列がらみの話 
があったんだっけ。でも，これはよい子は 
必ず読んでいる「 C ューザーズマニュアル」 
に書いてあるこ！:だから，説明しなくても 
いいかな？ やっぱりしておこう。 

まず，次の例のように switch や case の後ろ 
に文字変数や文字列を書いてはいけない。 

く例2> 

100 str s = “ ABC ” 

110 switch s 

120 case “ ABC ” ：〜 

130 case abc ” •’ 〜 

140 default :〜 

150 ends witch 

この書式はインタプリタでは許され，結 
構便利なんだけど，さっきもいったように 
C に変換されたときには s は char 型の配列 
になるんだから，意味不明のプログラムと 
なってしまう。 

100 dim char s (32) 

110 switch s 

なんて書く人はいないでしよ？ 

もうひとつ，やっちゃいけない文字列操 
作としてマニュアルに書いてあるのが， 
strlwr 
strupr 
strrev 

の引数に文字列を直接記述してはいけない 
ということ。つまり， 

1000 strrev (“ ABCDEFG ”) 

というような書き方はペケだというわけな 
んだけど， X - BASIC インタプリタではそも 
そもこれら3関数の引数は「文字変数」でな 
ければならないことになっているから問題 
ないだろう。ただ，このような書き方が C 
では許されてしまうから気をつけなさい， 

という程度に解釈しておけばいい。 


，:文字: 


I 列を扱うときのお話 
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これが式にまつわる落とし穴だ 

次に式まわりに触れておく。 X - BASIC と 
C で致命的に違うのが論理式の値だ。 X-BA 
SIC では真のとき一1，偽のとき0を値とす 
る力、 C では偽は同じく 0なんだけど，真の 
ときは1になってしまうんだ。試しに， 

10 print (1=1) 

という1行プログラムをコンパイルして， 
X - BASIC 上で動かしたときと比べてみてほ 
しい。 

この違いはどんなときに問題になるかと 
いうと， BASIC 慣れした人が好んで使う次 
のようなパターンがその代表だろう。 

1000 a 二 a +( a >10) *10 
このプログラムは a が10より大きれれば a 
から10を引くということで， 

1000 if a >10 then a=a — 1〇 
と同じ意味になる。 a が10より大きければ， 
( a >10) 

の値が一1になり，それを10倍したものを a 
に足すのだから a は10小さ〈なる。ところが 
これを コンパイル すると， a が10より大きけ 
れば， 

( a >10) 

は1となり，10引くつもりが10を足すことに 
なってしまうのだ。 

別のパターンとしては，こんなのもある。 
〈例3> 

100 int a , c , fp 

110 fp=fopen (“ test ”，“ r ”） 

120 c=fgetc ( fp ) 


図 1 BC の使用例 


リスト 1 : X - BASIC 上て•は正しく動くのに 
コンパイルすると動かないプログラム 

10 /* コンパイル すると動かない例*/ 

20 str s 

30 test( M k = ，， ,1,1 > 

40 test( M 7T /2 = M ,2,0.5#) 

50 test ( M 2 7T = M , 3 f 2 ) 

60 print •• - hit key - 

70 s=inkey$ 

80 print 
90 end 

100 /本 

110 func test(mes ； str,no,mul;float) 

120 print no 

130 print mes ； 

140 print pi(mul) 

150 endfunc 


130 a=islower ( c ) 

140 if a =—1 then — 

このプログラムは test という フ アイ ルから 
1文字読み込んで，それが英小文字だったら 
140行の then 以下の処理をするというものだ 
力 ? ，コン パイルすると思ったような動作を 
しない。読み込んだ文字が小文字のときに 
islower の返す値 力す 1になってしまうため 
行の条件式が常に偽となる から then 
決して実行されなくなってしまうのだ， 


=2) then 〜 

、コンバ ー トされるとき 


1000 if not(a = 

の意味だけど，〇 
には， 

1000 if (not a ) =2 then 〜 

と見なされてしまう。 BC を通すときには過 
剰なぐらいカツコをつけたほうが安心とい 
うことだ。 


め，140 

r マニ 


ユアル，ちゃんと読んでる7 


このようなことを避けるためには140行を 
140 if a く>0 then 〜 

としなければいけない。「もし真だったら」 
という条件を「もし偽じゃなかったら j に 
変えるわけ。意味は同じだよね。 

ここでちよっと余計な話をしておこう。 
X - BASIC の関数のなかにはエラーのとき 
に一1を返すものがある。これはあくまで「エ 
ラーのときは一1」であって「真を表す一1」 
とは全然違う話だ。だから，コンパイルし 
ても 一1 が1になるようなことはないので注 
意してほしい。 

さて，式に関して X - BASIC と C で違う点 
の2番目は演算子の優先順位だ。といっても 
さすがに C でも * より十のほうが優先され 
るなんてことはない。マズいのはシフト演 
算，比較演算なんかを使ったときで，これ 
らの場合，演算の順序が遠ってしまうこと 
がある（と マニュアルに 書いてある）〇明ら 
かに違うのは not の優先順位で， X-BASIC 
では， 

1000 if not a =2 then 〜 

という1文は， 


リスト2 :リスト彳を BC にかけたもの 

# include M basic0•h M 

static unsigned char s[32+lj; 
int test ()； 

/ 本本本本本本 * 本本本 program start 本 ♦ 本本本本本 / 

void 

main(b_argc f b_argv) 
int b—arge; 

char 本 b—argv 丨】； 

( 

unsigned char 8trtmp0[256 】 ； 
b_init<); 

7 * コンパイルすると動かない例本“/ 

testr 冗 = ，f ,l ,1 ) ； 

test( M tc/2 = M , 2 f 0.5 ); 
test( M 2;r = M , 3,2 )； 

b_sprint( H - hit key - " > 


「 c ユーザー ズマ ニュ アル 」 の92 ページに 
「名前のつけかた」という項がある。ここで 
は C 言語に変換する場合，プログラム中で 
使ってはいけない名前として， 

• main 

• S で始まり6桁までの半角数字が続いてい 
る名前 

• L で始まり6桁までの半角数字が続いてい 
る名前 

• b - で始まる名前 

が， また，注意の必要な名前として， 

• $で終わっている名前 

があげられている。 マニュアルから 落ちて 
いるようなので，もうひとつ使わないほう 
がいい名前として， 

• strtmpO . strtmp 9 

をこの場でつけ加えておく。 

使っちゃいけないと書いてあるんだから 
使わなければいいわけなんで，これは大き 
な問題にはならないだろう。もし間違って 
使ってもコ ンパイル 時-か アセンブル 時にエ 
ラーが出るから，それから直せばすむ。話 
はこれで終わりなんだけど，ついでだから 
好奇心旺盛な人のために，どうして使っち 
ゃいけないかという話をしておくとし 
ょぅ。 

まず， main という名前は C では特別 
な関数名として扱われ.ていて，プログ 
ラムのどこかに必ず main という関数が 
なければならず，どこで宣言されてい 
ようとプログラムの実行は main から始 
まることになっている。 X-BASIC の場 
合，メインルーチンは関数の形をして 
いないけど， C へ コンパ、一 卜されると 
きに main がどこにもないと困るので， 


リスト3 :コンパイルしても正しく動くプログラム 

10 /* こうすれば動く本/ 

20 str s 

30 test( M 7t = M, 1#) /本 ここと 

40 test( M tt /2 == M ,2,0.5#) 

50 test(" 2 k = m ,3,2#) /* ここと 

60 print ’’ - hit key - •，； 

70 s=inkey$ 

80 print 
90 end 
100 /t 

110 func test(mes;str,no;int,mul;float) /* ここ 
120 print no; M ) M ; 

130 print mes; 

140 print pi (mul ) 

150 endfunc 


b—strnepy<sizeof<s},s,b—inkeyS(strtmp0>>; 
b_sprint(STRCRLF )； 
b_exit(0 )； 

/**/ 


/ 本本本本本本拿 * 本本本本本本 ; ！ ; 本本本本本本本本本本本本 / 

int test(mes , no , mul) 

unsigned char mes[32 + 1]; 

unsigned char no[32+1 ]； 

double mul; 

{ 

b—sprint {no ) ; b—sprint (" ド }; 
b—sprint < mes); 

b_fprint(b_pi(mul)) ； b_sprint(STRCRLF )； 


/ 本！ : 本 * 本本本本本本本拿本本ま本本本拿本本本本本本本拿 / 


メインルーチンを main という名前の俠 
数にしてしまうわけだ。ユーザーが ma 
in という名前を別に使ってしまうと， 
ダブってしまうわけだから 当然エラー 
になる。例によって念のため補足して 
ぉくと， main という名前の「局所変数」 
は使っても構わない。わかるよね。 

大文字の S と L から始まって残りは数 
字だけでできている名前は gosub や goto 
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の分岐先を表すために使われる。 X-BASIC 
では gosub や goto の飛び先には行番号を使 
うけれど， C では行番号の代わりに名前（ラ 
ベル名$を使う0そこで BC は適当な名前を 
でっちあげるというわけだ。この説明を読ん 
でのとおり， gosub や goto を使わなければ S 
や L から始まる名前を使っても構わない。 

b - で始まる名前が使えないのには次のよ 
うなわけがある。 X-BASIC と C では同じ名 
前で同じような機能の関数がいくつもあっ 
て，名前も機能もまったく同じなら問題は 
ないんだけど，返り値なんかが少しずつ違 
っている場合がある。たとえば， fopen とい 
う関数は X-BASIC でも C でもファイルを才 
ープンするという働きは同じなのに，返す 
値力? X-BASIC ではファイル番号で， C では 
FILE 構造体へのボインタというものになる。 
だから C の fopen をそのまま使うことができ 
ないんだ。 

そこで BC では b _ fope n という別の関数を用 
意して， fopen が出てきたらすかさず b _ をく 
っつけて，この関数の呼び出しに変更する。 
これで安心して fopen が使えるようになる代 
わりに b-fopen という名前を別の目的で使う 
ことができなくなるわけだ。 

$で終わる名前を使うときの注意点という 
のは b - の場合に少し似ている。 C では$の文 
字は名前に使うことができないので， BC 
は$を大文字の S に置き換える。ユーザーズ 
マニュアルに載っている例をそのまま使う 
と， bun $ は bunS にコンバートされる。だから, 
bun $ を使っているときに bunS という名前が 
別にあるとダブってしまうということだ。 

strtmpO といった名前も BC が勝手に使う 
名前で，文字列操作を行うときに使われる。 
C では文字変数がなく， char 型の配列を文字 
列とみなして使うのだった。そのため文字 
列操作は手間が掛かる，というところまで 
は話したよね。ここで， 

100 str s = “ ABCDEFG ” 

110 S = right $ ( s , l )+ left $ ( s , l ) 

というプログラムを C にコンバートしたと 
きのことを考えよう。 

BC によって s は char 型の配列に変換され 
ている0すると，上のプログラムは， S 己列 
の最後の要素と最初の要素だけを取り出し 
て，元の配列に収め直すものとなる。これ 
を頭から順に処理しようとすると最後の要 
素を最初に持ってきて，それから最初の要 
素を2番目に持ってくるという形になるだろ 
う。よ一く考えてみると，これでは困るん 
だ。 “ GA ” となるはずが“ GG ” になってしま 
う。なぜって，最後の要素を先頭に持って 
きた時点で，今まで最後にあった要素が先 


頭の要素になってしまうからだ。 

これを避ける手っ取り早い方法は，もう 
ひとつ別の配列を用意して，それ上で作業 
を行い，終わってから一括して s に戻すこ 
とだ。この「別の配列 j にあたるのが strtm 
P というわけ。まどろっこしい説明だけど， 
わかってもらえただろうか？ 

石の都合といろことちある 

そのほかにもマニュアルには「してはい 
けないこと」力 ? いくつか載っている力、そ 
のほとんどが 

• endfunc のあとに main 部のプログラムを続 
けて書いてはいけない 

• func で宣言した関数のなかから関数の外 
に goto 文で飛び出してはいけない 

といったあったりまえのことなので説明す 
るのはやめておく。おっと，ひとつだけ重 
要なことがあるので，こいつについて話し 
ておこう。マニュアルには， 

• fume 内で大きな配列を確保してはいけま 
せん0大きな配列はメインルーチンで確 
保してください。 

とある。 

この理由を説明するには MC 68000の話を 
しなければならない。が，そんな話を聞い 
てもあまり喜ぶ人もいないだろうから，ご 
く簡単に（はしよって）説明する。 

C 言語では（動的な）局所変数はある場 
所（スタック上）に作られる068000という 
MPU にはこの「場所を確保する命令」があ 
って， XC はその命令を使って局所変数を置 
いておく場所を作る。ところが，この命令 
で保される領域は一定の大きさ （32768 バ 
イト）までに制限されているのだ。うまく 
やればこれ以上の大きさを確保する手段も 
あるけれど， XC はそこまではやってくれな 
い。また，スタック領域の大きさにも限り 
があって，むやみに使うわけにもいかない 
のだよ。 

こういった理由で局所的な配列は「あま 
り」大きく取ることができないわけ。メイ 
ンルーチンで宣言する配列の大きさにはこ 
のような制限はないし，万一，宣言した配 
列が大きすぎてメモリが足りなければプロ 
グラムの起動時にエラーが出るはずだから 
安全なんだ。 

これ，よろしくお願いね 

さて，大詰めだ。最後に BC の大バグを公 
表しよう0次のようにプログラムを書いた 
とする。 


く例4> 

100 test (“ ABCDEFG ”，10) 

110 end 

1000 func test ( s ; str , n ) 

1010 while n >0 
1020 print s 

1030 n=n —1 

1040 endwhile 
1050 endfunc 

ここで1000行以下の関数は for を使ってい 
ないのがちよっとわざとらしいが， n の値を 
だんだん減らしていって0になるまで文字 
列 s を表示する，結局 s を n 回表示する関数と 
いうことになる。で，このプログラムをコ 
ンパイルして実行してみると，なんと！ 
バスエラーを起こして止まってしまうんだ。 
さあ闲った。いったいどうなっているんだ？ 
惡いことはしていないはずなのに！ 

この症状は X - BASIC と BC の仕様の違い 
という力*，はっきりいって BC のパ、グといっ 
てよいだろう J - BASIC では関数の仮引数 
の型が省略されたときは int とみなすが ， BC 
は 「 DT 前の引数と同じ型」として処理して 
しまうのだ。上の例だと n が str 型になって 
しまったわけ。 

最初に書いたように，仮引数と実引数の 
型が違っても C コンパイラは文句をいわな 
い。そのため，平気な顔で char 型の配列と 
数字の0を比較しようとして（1010行）死 
んでしまうことになる。こうならないよう 
にするためには面倒でも， 

1000 func test ( s ; str , n ; int ) 

のように int 型の仮引数もちゃんと宣言する 
ようにしなければならない。くれぐれも， 
シヤープさんには B C のバージョンアップ 
をお願いしたい（オプテイマイザもよろし 
くね)。 

X - BASIC + BC でフ。ログ、ラムを f 隹るうえ 
での注意点はだいたいこんなものだ。こう 
やって書き並べてみると結構な量になって 
びっくりしている。けれど，きちんと文法 
に従い， BC のマニュアルを読んでいれば， 
ここに書いたようなことはそうそう起こる 
ものではないと思う。 

そうそう，マニュアルといえば， XC の「あ 
の」ぶ厚いマニュアルのうち BC に関係ある 
ところはほんの数ページしかない。「だから， 
説明不足なんじゃないか！」と怒っている 
人もいるかもしれないけど，逆にいえば， 
たったそれっぼっちなんだもの，ちゃんと 
読んでおいてほしいな。 

と，教訓めいた終わり太をするのは気が 
ひけるけど，やっぱりこれでおしまいにし 
よう。ちやんちゃん。 
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吾からの誘惑 


特別講義 E 


Nakamori Akira 

中森章 


C でアセンブリ言語の勉強を 

いかに C が魅力的であっても，パソコン，特に8ビットマシンではその力を発揮できない 
と考える方も多いでしょう。そして，やっぱりマシン語にいちばん興味があるという人， 

このユニークな中森氏の講義をぜひとも読んでみてください。 


II 


C 言語とアセンブリ言語 


c 言語はアセンブリ言語の代用品として 
よく利用されますが，しよせんはコンパイ 
ラ言語ですから，アセンブリ言語に比べて 
効率の悪いコード（たいていはアセンブリ 
言語の プログラム） を出力してしまいます。 
確かにこれは本当のことで，アセンブリ言 
語一本槍の プログラマ の論理の より 所とな 
っています。 

しかし，実は必ずしもそうとは言えない 
場合もあります。最近では C コ ンパ イラの 
最適化の技術が進み，いかにすごい最適化 
が行われているかが C コンパイ ラの「売り」 
のひとつになっています。そして，プログ 
ラムのある局面の記述に ついては， C コン 
パイ ラはべテランのプログラマがア セン ブ 
リ言語で記述したコードとまった〈同じか， 
時にはそれよりも効率のよいコードを出力 
します。ですから，アセンブリ言語を覚え 
たばかりの人が C コンパイ ラの出力より 
効率のよいコードを書〈ことはほとんど不 
可能です。 

また，ベテランのプログラマにとっても， 
C 言語の出力するコードをあとから手でさ 
らに最適化することによって，自分の能力 
以上のコードを作ることも可能になります。 
しかし，多くの場合は C コンパイラの出力 
するコードで満足（我慢？）するプロダラ 
マが多いようです。もっとも， C 言語の記 
述がどのようなコードに変換されるかを知 
っておけば，ある程度自分の思いどおりの 
(効率よい）コードを c コンパイラに出力さ 
せることができますから，あえて出カコー 
ドに手を入れる必要はありません力 ? 。 

また，思い どおりの 出 カコー ドを得ると 
いう，大それたことを考えない場合でも， 
c コンパイラの 出力する コードには 学ぶベ 
きところが多くあります。特に，アセンブ 
リ 言語をこれから勉強しようという人にと 
っては， C コンパイラの 出カ コードは よい 
テキストになるでしよう。 （デコンパイラの 
出力する コードの 中に現れないような命令 
は，アセンブリ言語だけでプログラミング 
を行う場合も，まず必要ありません。 C コ 


ンパイラの出カコードに使われている命令 
を完全に理解することができたら，あなた 
はもうアセンブリ言語上級者なのです。 

というわけで，いくつかの C 言語の記述 
に対して，それらが C コンパイラによって 
どのようなコードに変換されるのかという 
ことを，これから見ていくことにしましよ 
う。コンパイラは， Z 80 代表として orC ，8086 
代表として Turbo C ， 68000代表として XC 
を用いますが，これら以外に特徴的なコー 
ドを出力するコンパイラがあればその都度 
紹介したいと思います。 

なお， C 言語の文法は特に説明はしませ 
んが，第1部の入門編や Appendix のリファ 
レンスを参照してくださいね。また，アル 
ゴリズムの記述には Algol (もはや知ってい 
る 人は いないかなあ） に 近い オリ ジナル（適 
当な）言語を使用していますが， BASIC が 
わかる 人には わかると思います。 


:II 


ループ構造 


最初はループ構造を見ていきましよう。 

C 言語では， 
for 

do 〜 while 
while 

アルゴリズム〗 ループ 
i — 0 

LOOP ： 

if i ^ 100 then goto EXIT 
”文’の実行 


goto LOOP 


EXIT ： 


アルゴリズム 2 ループ 


という3種類のルーフ。構造を使用すること 
ができます （ goto 文を用いたループは考え 
ていない）。これらは，終了条件を判断する 
位置が微妙に異なっていて，それぞれ時と 
場合に応じて使い分けます。このようなル 
ープをアセンブリ言語で記述することは難 
しそうですが，実は案外単純に実現できて， 
C コンパイラで出力されるコードもかなり 
似ているのです。 

これらのループ構造の記述に対して，実 
際の C コンパイラがどのようなコードを出 
力するかをリスト1に示します。以下にル 
ープ構造に対するアルゴリズムを説明しま 
すからそれと照らし合わせながら読んでみ 
てください。 

1 )for ループ 

for ループは，通常，有限回の繰り返しを 
記述します。たとえば， 

for(i = 0; i <100; i + +) 文； 

というループを考えましょう。意味からい 
えば， C コンパイラのコードとしては，ア 
ルゴリズム1のようになるべきですが，コ 
ードを出力する都合からアルゴリズム2の 
ようになっているコンパイラが多いようで 
す。 

アルゴリズム1にしても，アルゴリズム 
2にしても，0回ループ（ループしない） 

アルゴリズム4 ループ 
LOOP ： 

w 文”の実行 
i — 1-1 

if i 关 0 then goto LOOP 

アルゴリズム 5 ループ 
LOOP ： 



i — ❸ 


if i = 0 then goto EXIT 


goto SUP 


” 文”の実行 

LOOP ： 



goto LOOP 


•文"の実行 


EXIT ： 


i ♦- 1+1 



SKIP ： 



アルゴリズム 6 ループ 


if 1 < 100 

then goto LOOP 

goto SKIP 




LOOP ： 

アルゴリズム 3 ル 

-プ 

” 文”の実行 


i —• 0 


SKIP: 

LOOP ： 



i i -1 


”文 • の実行 


If i =^= 0 then goto LOOP 


100 then goto LOOP 
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場合はアルゴリズム1か2のようにならざ 
るを得ません0また，アルゴリズム 3 を使 
うコンパイラでは，最初から ループし ない 
ことがわかっている場合は， ループに 対す 
るコードをまった〈出力しないものもあり 
ます。リスト1を見てもらえばわかります 
が， QC はアルゴリズム 1 ， Turbo C はアル 
ゴリズム 2 ，XC はアルゴリズム 3 を 採用し 
ています。 

2) do 〜 while ループ 

do 〜 while ループはループ回数が不定のと 
きに用いられます。ループの最後で終了条 
件の判定を行いますから，必ず1回はルー 
プを行います。たとえば， 

U スト1 


3. ループ （Turbo C) 


^TEXT 

DGROUP 

TEXT 

DATA 

_d« 

DATA 

_BSS 

_BSS 

_TEXT 


_m«in proc 


Line 3 
Line 4 
Line 5 
Line 6 


cut 

L byte public 'CODE* 

^DATA^BSS 

ca:-TEXT•da:DGROUP, bb:DGROUP 


- byte public •CODE* 




;Line 7 
: Line 8 


■ov di # si 

add dl.ie 

inc 癱 i 

cap si, 100 

jl 94 


; i < ieo ならループ 


の埸合があることを考慮してループの最初 
で終了条件をチェックします（アルゴリズ 
ム2では，ループの最後で行うチェックに 
ジャンプして1回目のチェックをしている 
のですが)。しかし今の場合， i の初期値が 
0で終了値が100 (正確には 99) ですから， 
必ず1回はループすることがわかっていま 
す。このため，アルゴリズム1や2では1 
回とはいえ確実に余分な終了条件のチェッ 
クを行うことになります。したがって，こ 
れを最適化したアルゴリズム3のようなコ 
ードを出力するコンパイラもかなりありま 
す。 

ただし，初期値が変数で与えられている 

1. ループ （ C 言語） 

mam () 

{ 

register int i ； 
register int j ； 

for(i=0;i< 100 ;i++) j=i+10; 

do j = i + 10 ; while(--j); 

do j=i+10; while(j--); 

while(--i) j=i+j; 

while(i —— )j = i+j; 

} 

2. ループ （《 C ) 


do 文； while ( — j ); 

というループを 考え ましよう。この ループ 
に対する出カコードのアルゴリズムは，ル 
ープの最後で条件判定をするため， for ルー 
プのアルゴリズム3と同様です。具体的に 
はアルゴリズム 4 のようになりますが， do 
〜 while ループに 閲 してはほかのア ルゴ リズ 
ムはないようです。 

しかし，終了条件が， 

1 >2 

というように常に成立しない場合は，終了 
条件のチェックを行うコードを出力せずに， 
次に進むということはあるかもしれません 
が0 


mov ax,di 
or ax,ax 
jne 


； j<>0 ならルーブ 


Add di,10 

mov blx ,di 

dec di 

ax, ax 




< j+noo ならループ 


；Line 
；Line 

• 14 : 


or 

add 


； Li! 

til： 


Je 

論 ov 
add 
■ov 
J»P 
， 15 




ii<>0 ならおわり 


Itext 

—DATA 

^ATA 

.TEXT 

.TEXT 


ret 

endp 

enda 

labei n 


byte public 


4. ループ （ XC) 


include fefuno.h 

• XRBF _omin 
•XDEF “wain 

• TEXT 


； D7 r i D6 : 


ADDQ.L #1,D7 

MOVE.L D7,D0 
CMP.L 磬 100, DO 
BLT L 20001 


; i <100 ならループ 

；J <- i.10 

；—J 

;j<>0 ならルーブ 


D7.D6 

iie ( D6 


MOVE.L 06.00 
SUBQ.L »1,06 
TST.L DO 


(j*l)oe ならルーブ 


MOVE.L D7.D0 
ADD.L D6 f D0 
MOVE.L D0.D6 

SUBQ.L f 1,07 
BNE L 20003 


； i<>0 ならルーブ 


MOVK.L D7,D0 
ADD.L D6,De 
MOVE.L D0.D6 

MOVE.L D7.D0 
SUBQ.L #1,D7 
TST.L D0 
BNE L 20005 


(i^l)<>0 ならルーブ 


LINK A6,#0 

MOVEM.L D6/D7,-(SPJ 

CLR.L D7 

BRA L4 

• DATA 

.EVEN 

.END 


lig 

6C4 
な (B 
=0 i 
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2. switch ( ac ) 

: このリストは orC のオブ 

逆アセンブルし T 作蝶し 


300 H とした睡色 


上位8ビットの比較 


; f 位8ビットの比較 
；一致しなければ次へ 


上位8ビザトの比® 


下位8ビマトの比® 


という switch 文に対してはアルゴリズム9 
が用いられます。 

これは，変数 i を直接アドレスに対応 させ， 
そのアドレスで示されるメモリ内にジャン 
プ先のアドレスを格納してお〈という，か 
なり技巧的なアルゴリズムです0このアル 
ゴリズムの素晴しいところは，メモリを1 
回アクセスするだけでジャンプ先を得る（メ 
モリ間接ジャンプですよ）ことができる点 
にあります0アルゴリズム8の後半でも同 
じことをしていますから，比べてみると面 
白いでしよう（アルゴリズム8の欠点は if 文 
を ループさせる 点のみであり，後半のメモ 
リ間接ジャンプは見事なものです）。 

この アル ゴリズム9は CASE の f 直が1ず 
つ増加しているときにしか使用できません 
が，ある程度なら値が飛び飛びになってい 
ても使用することができます。それは，メ 
モリ内に格納するジャンプ先に DEFAULT 
处理を行う場合のアドレスを挿入すること 
によって行います。たとえば， 
switch ( i ) | 

case 1.文1 ; break ; 
case 3 •文2 ; break ; 
case 6 •文 3 ; break ; 


main() 


switch(i){ 



case 100: 

i=100 ； 

break ； 

case 200 : 

i=200 ； 

break; 

case 300 : 

i=300; 

break ； 

case 400: 

i=400 ； 

break ； 

default 

\ 

t ： 

i=500; 


switch(i){ 



case 1 


i=101 ； 

break 

case 2 


i=201; 

break 

case 3 


i=301 ； 

break 

case 4 


i=401; 

break 

default 

» 

t ： 

i=501; 


switch(i){ 



case 1 


i=102 ； 

break ； 

case 3 


i=302 ； 

break; 

case 7 


i=702 ； 

break ； 

case 9 


i=902; 

break ； 

default 

b: 

i=802; 



を並べて書〈代わりに，ひとつの if 文を c 
ASE の個数回だけループさせようという方 
針です。このとき，比較する値はメモリ内 
に置かれ，これらの値は配列要素をアクセ 
スする要領でアクセスされ，変数と値が一 
致したときに if 文のループを抜け出します。 

アルゴリズム8はなかなか技巧的で，読 
む人をうならせるものがあります。しかし， 
メモリアクセスを何度もする点，条件分岐 
を使用する点を考慮すると，実行速度は if 文 
を立て続けに並べるよりもかなり遅くなり 
そうです 0 Turbo C がこのアルゴリズムで 
コードを出力しますが， コンパイ ラとして 
は，出してほしくないコードです。 

さて，これまで示したように， C コンパ 
イラは CASE の値が飛び飛びの場合は if 文 
を使って switch 文を実現しますが ， CASE 
の値が1ずつ変化している場合は別のアル 
ゴリズムが用いられることが多いようです。 
たとえば， 

switch ( i ) | 

case 1•文1 ; break ; 
case 2 :文2 ; break ; 
case 3 •文3 ; break ; 
case 4 •文 4 ; break ; 
default :文 5 ; 

1. switch(C 言語） 

int i=0; 


3) while ループ 

while ループもループ回数が不定のときに 
用いられます。繰り返し動作の最初で終了 
条件の判定を行いますから，ループを行わ 
ない場合もあります。たとえば， 
while ( - j ) 文； 

という文に対するコードは，意味どおりに 
はアルゴリズム5によって作られます。し 
かし，コンパイラの都合でアルゴリズム6 
のようになる場合もあります。これは for ル 
ープのアルゴリズム1と2の関係に似てい 
ますね0例によって，必ず成立しないルー 
プ条件が指定された場合は， while ループに 
対するコードをまったく出さないコンパイ 
ラがあるかもしれません。なお，リスト1 
から ， a C はアルゴリズム1 ， Turbo C もア 
ルゴリズム1， XC はアルゴリズム2を採用 
していることがわかります。 

switch 文 

switch 文は変数の値に対応して，実行す 
る動作を選択する場合に用います。まずは 
switch 文に対してコンパイラの出力するコ 
ードをリスト2に示しましよう。それでは 
まず， 

switch ( i ) | 

case 100 :文1; break ; 
case 200 ••文2 ; break ; 
case 300 ••文 3 ; break ; 
case 400 :文 4 ; break ; 
default :文 5 ; 

I 

という switch 文を考えましょう。この文は， 
いうまでもなく変数 i の値力 ? 100である場合 
は“文ドを実行し，200である場合は“文2” を 
実行し，300である場合は“文3”を実行し， 
400である場合は“文4”を実行し，それ以外 
の場合は“文5 ” を実行することを指示しま 
す。 

「なんだ, if 文を抱ベれば同じことができる 
じゃないか」という人がいると思いますが， 
実はまったくそのとおりなのです。それで 
は， if 文とどこが遠うのかといえば， switch 
文のほうがプログラムを見やすく記述でき 
るという程度のことでしかありません。 

実際 C コンパイラも，基本的には， if 文を 
立て続けに並べたのと同じコードを出力し 
ます。つまり，アルゴリズム7です。ひ C 
や X C はこのアルゴリズムでコードを作って 
います0ただし，アルゴリズム7はコード 
サイズが大きくなる傾向にあるので，アル 
ゴリズム8のようにコードサイズを小さく 
するものも考えられています。これは if 文 


li スト E 


00 


0 ( 6 • 0 0*0 4 
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_ 騰龜 In 

一 TEXT 
•DATA 


■egaent byte public > CODK* 
public .M»in 


swi tch ( XC ) 


include fiyfunc.h 
.GLOBL .i 
.DATA 

.DC.L 0 

• XREF oinin 
•XDEF mnxn 

• TEXT 


default ••文 4 ; 

i 

のように， CASE の値の増加が 1 ずつでな 
い場合でも，アルゴリズム9の LABEL 以 
ドに格納してあるジャンプ: t アドレスを， 


LABEL : 


DW 

CASE 1のアドレス 

DW 

DEFAU し丁のアドレス 

DW 

CASE 3 のアドレス 

DW 

DEFAU し丁のアドレス 

DW 

DEFAU し丁のアドレス 

DW 

CASE 6 のアドレス 

とすることで適川できるのです。 

もちろん， ifi 初にボしたような CASE の 

値がバラバラの場合も， 

LABEL : 


DW 

CASE 100のアドレス 

DW 

DEFAU し丁のアドレス 

DW 

DEFAU し丁のアドレス 

DW 

CASE 200 のアドレス 

DW 

DEFAULT のアドレス 

DW 

DEFAU し丁のアドレス 

DW 

CASE 300 のアドレス 

DW 

DEFAULT のアドレス 


という U に，ジャンプ! t をひたすら收ベ 
続けることによって，アルゴリズム9を適 
IH できますが，この場合のコードサイズは 
膨人なものとなってしまいます。このため， 
アルゴリズム9は CASE の値の差がある程 
度小さくないと有効ではありません。しか 
し，视货は差がある範 I 用に収まる場合が多 
いようで，アルゴリズム9は16ビット以上 
の CPU の C コンパイラではほとんど常識に 
なっているようです。 

リスト2を見てわかるように ， CASE の 
値がある程度近い場合は ， Turbo C も XC も 
このアルゴリズムになっていますね 0 もち 
ろん，このアルゴリズム9は8ビット CPU 
でも吋能なはずですが， aC だけでなく，8 
ビット最高速といわれている LSI - C にぉい 
てもなぜか使用されていません。どうして 
なんでしょう。 

ところで，アルゴリズム9はメモリ内に 
ジャンプ光のアドレスを置いたわけですが， 
さらに技巧的な方法としては，アドレスで 
はなく，メモリ間接ジャンプがあるアドレ 
スからのオフセット値を置く方法もありま 
す。 

あるアドレスからその近くのアドレスま 
でのオフセット値（アドレスの値の差）は， 
通常，アドレスを表すビット数（たとえば 
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32 ビット）よりも少ないビット数（たとえ 
ば16ビット）で表すことができます。この 
ため，オフセット値をメモリから取り出す 
場合は，アドレスを取り出す場合よりも少 
ない阿数のバスサイクルで行うことができ， 
命令の実行が高速になります。 

これは Sun-3 の UNIX_h の C コンパイラ 
で行われているアルゴリズムですが，本凼 
に最適化をするためにはバスサイクルの M 
数などということも考慮しなければならな 
いのですね。具体的なアルゴリズムは，ア 
ルゴリズム9のちょっとした変形ですから 
谷自考えてみましょう。 Z 80 や8086の命令 
では実現（この場合は8ビットのオフセッ 
卜を使うことになる）が難しいかもしれま 
せんが，68000なら簡単だと思います。 

定数の乗算 

C 言語では式の計算に掛け算や割り笕を 
使うことができます（当たり前！）。しかし, 
たいていの 8 ビット CPU は掛け算命令や割 
り算命令を持っていません。また，掛け算 
命令や割り算命令がある CPU でも，それら 
の命令は実行速度が遅いため，特殊な場合 
はなんらかの工夫を行っています。ここで 
は，定数値との掛け算に対して C コンパイ 
ラがどのよう.なコードを出力するのかを見 

アルゴリズム7 switch 

if i =100 then goto CASE 100 

if i = 200 then goto CASE200 

if i = 300 then goto CASE300 

if i = 400 then goto CASE4B0 

•文 5 •の実行 
goto NEXT 
CASE 100 ： 

•文 1 ”の実行 
goto NEXT 
CASE200 ： 

"文 2” の実行 
goto NEXT 
CASE300 ： 

•文 3” の実行 
goto NEXT 
CASE408 ： 

1 •文 4 •の実行 

NEXT ： 


アルゴリズム8 switch 

cnt ♦- CASE の個数 
t»p — LABEL の 
LOOP ： 

if I = *tap then goto NEXT 
t_p — tap + 9- 卜 • ，ィ r 
cnt 4 - cnt - 1 
if cnt ネ 0 then goto LOOP 
goto DEFAULT 
LABEL ： 

D 冒 100 


てみましよう。 

まず，掛け算のプログラムと C コンパイ 
ラの出力をリスト3に示します。描'け算を 
行う場合に通常行われるのは掛け算用のサ 
ブルーチンを呼ぶことです。しかし，ある 
特定の場合は，サブルーチンを呼ぶまでも 
なく結果がわかってしまうのです。以下に 
いくつかの特定な場合について考えてみま 
す。 

1) 1倍 

これは変数の仙:をそのまま転送するだけ 
です0これをアルゴリズム10としましよう 
(大袈裟)。しかし，コンパイラによっては 
素直に1倍するタコもあるようです。 

2) 2倍 

これには，そのまま#卜け算してしまう夕 
コを除いて，2通りの アル ゴリズムがあり 
ます。それは，シフトを利用する方法（ア 
ルゴリズム 11) と足し算を利用する方法（ア 
ルゴリズム 12) です。実行速度の点から見 
れば，足し算のほうが速いことは明らかな 
のですが，多くのコンパイラはシフトによ 
る計算を行っているようです。ところで， 
整数値を1ビット左シフトすると，値が2 
倍になることは知ってますよねえ。 

3) 3倍 

2倍と1倍（自分自身）の加算によって 
行われます0これがアルゴリズム13です 0 

DI 200 
DR 300 
DV 400 

DV CASE100 の mx 

DI CASE200 の mx 

Dl CASE300 の 7 ドレス 

Di CASE400 の mx 

CASE100 ： 

•文1"の実行 
goto EXIT 
CASE200: 

”文 2 •の実行 
goto EXIT 
CASE300 ： 

• 文 3 •の実行 
goto EXIT 
CASE400 ： 

" 文 C の実行 
goto EXIT 
NEXT ： 

disp — case の個数 x 
goto *(tap ♦ disp) 

DEFAULT ： 

• 文 5 •の実行 
EXIT ： 


注） * tmp は tmp の中に入っているアドレスで 
示されるメモリの内容（今は，100, 200,300, 400 
のどれか）を示す。また， * ( tmp 十 disp ) は tmp + 
disp で計算されるアドレスで示されるメモリの 
内容（今は， CASEI 00 のアドレス， CASE 200 の 
アドレス， CASE 300のアドレス， CASE 400 のア 
ドレスのどれか）を示す。 


2倍についてはアルゴリズム11と12のどち 
らかが用いられますが，コンパイラによつ 
ては， 2倍のときにアルゴリズム11(シフ 
卜）を用いていながら，3倍のときの2倍 
にはアルゴリズム12を用いている変わり者 
もあります。 

4) 4倍 

圧倒的に自分自身を2ビット左シフトす 
る（アルゴリズム 14) コンパイラが多いよ 
うです。しかし，自分自身を2度加算して 
も4倍を求めることができます（アルゴリ 
ズム15)。8086の C コンパイラは1ビットシ 
フトを2度繰り返して2ビットシフトを実 
现（アルゴリズム 14) していますが，2度 
演算を行うならば，加算を2度行ったほう 
(アルゴリズム15> が高速のはずです。不思 
議ですね。実際， Z 80 のコンパイラではア 
ルゴリズム15のほうがよく使われているよ 
うです。 

ところで，2倍，4倍のアルゴリズムを 
見ればわかるように，2%音 （2 倍，4倍， 

8倍，16倍，…… ） を求めるときには ， n 
ビットの左シフトカ、， n 回の加算が用いら 
れることがわかりますね。 

5) 5倍 

さすがに5倍になると挫折 （？） して，遅 
い掛け算命令を使用したり，遅い掛け算用 
サブルーチンを呼ぶコンパイラが多いよう 

アルゴリズム9 switch 
tip *— i 

if tap > CASE の 最大值 

then goto DEFAULT 
t«P — Up - CASE の 最小值 
tup 2 LABEL の 7 ドレス 

goto *(t«p2 + tap X 7- 卜 *1 ィス - > 
LABEL ： 

Dl CASE1 の yKkX 

DB CASE2 の 7 卜•レス 

Dl CASE3 のァドレス 

Dl CASE4 の 7 卜•レス 

CASE1 ： 

”文1•の実行 
goto NEXT 
CASE2 ： 

•文 2 •の実行 
goto NEXT 
CASE3 ： 

** 文 3 ••の実行 
goto NEXT 
CASE4 ： 

”文 4 •の実行 
goto NEXT 
DEFAULT ： 

•文 5 •の実行 
NEXT ： 


•二主） * ( tmp 2 + tmp x ワードサイズ）は tmp 2 + 
tmpx ワードサイズで計算されるアドレスで示さ 
れるメモリの内容（今は ， CASE I のアドレス， 
〇 ASE 2 のアドレス， CASE 3 のアドレス ， CASE 
4のアドレスのどれか）を示す。 
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です。しかし，まだ諦めないコンパイラも 
います。確かに，4倍が計算できるコンパ 
イラなら，それに自分自身を加えれば5倍 
になる（アルゴリズム 16) ので，もう少し 
辛抱して5倍くらいは計算してもらいたい 
ものです。例として用いている QC，Turbo 
C ， XC の各コンパイラはすべて挫折してい 
ますが' LSI - C ， MS - C ， Sun -3 の UNIX 
上の C コンパイラはアルゴリズム16で頑張 
っています。以後に6倍，7倍の場合を示 
してありますが，そこで用いられているア 
ルゴリズムもこれらのコンパイラで使用さ 
れているものです。 

6) 6倍 

5倍が計算できるコンパイラは6倍も諦 
めません。計算の仕方としては2つに大別 
できます。すなわち， 2倍と4倍をカロえる 
もの（アルゴリズム 17) と，3倍を求めて 
2倍するもの（アルゴリズム 18) です0 


1. 乗算 （ C 言語) 

int i ， j; 
mam() 


2. 乗算 （》 C ) 


寶數のぺースアドレスを100 0 H とした導台 

equ i«eeH 

BQU I662H 


SMUL EQU 623FH 


PUSH BC 

LD HL, 

LD し • 

L0 HL, 

ADD HL, 




CALL SWUL 

LD 

LD 

ADD HL.HL 

ADO HL.HL 

tD し J 

LD HL.C.i 

LD 0E t 5 

CALL SHUL 

LO 

LD 
LD 

CALL SMUL 

t.J) 

LD 
LD 

CALL «KUL 

LO 

LD 一」 

LD DE t 9 

CALL SMUL 

LD 

LO 
LD 

CALL SMUL 

LD (.J) 

LO H し 

LD DE f 

CALL SMUL 

LD しわ 

U> HL, 

LD DE V 

CALL SMUL 


LD 

LD Dfi,17 

CALL SMUL 

U ， ( J) 


HUi 


7) 7 倍 

7 倍にも 2 通りの方法があります。8倍 
をして自分自身を減算するもの（アルゴリ 
ズム19)，6倍をして自分自身を加算するも 
の（アルゴリズム 20) です。 

8) その他 

リスト3のプログラムにはこのほかにも， 
9倍，11倍，13倍，15倍，17倍についての 
例を示してありますが，残念ながらこの倍 
率では，ここで使用しているや Turbo 
C や XC は参考になりません。近くに， MS - 
C と力* LS 卜 C ， あるいは Sun - 3の UNIX 上 
の C コンパイラを利用できる環境があれば， 
出力されるコードを腿いてみてください。 

加減算とシフトをほとんどパズルを解〈よ 
うに組み合わせて掛け算を行っているのが 
わかるでしよう。 

そこまで頑張っていなくても，それほど 
大きな倍率でない掛け算 （1 倍，2倍，3 


U スト3 


3. 乗算 (Turbo C ) 


TEXT 

DGROUP 

TEXT 

.DATA 

一 DATA 
BSS 
t>« 

BSS 

TEXT 


byte public 'CODE* 

_BSS 

c ■: TKXT,d 鷗： DGKOUP •餳 n:DCJROUP 


篇 egaient 

<roup 

a 讎讎 uaitf 

sc<»*nt 
inhcl 

lnb«l 
end 灘 

鶄 《 霜 sent bjrti? public 'CODE• 


l word 
bytfr 


public 'DATA* 


lu \ 


Itkx? 

.BSS 


„BSS 

.DATA 


• r«t 
endp 

public 

label 

db 

public 

label 

db 


ax, word ptr DOROUP: 
word ptr DGROUP：_J. 

ax.word ptr DGROUP: 
ax, I 

Hord ptr DGROUP: J, 


word ptr DCROUPJ.J, 
ax, word ptr DGROUP: 

鼻 1 

ax. I 

word ptr DOROUP:_j, 
ax.word ptr DOROUP： 


word ptr D0R0UF:. 


word ptr DOROUP:.J, 
ax, word ptr DOROUP： 


word ptr OGROUP：_J, 
ax,word ptr DGROUP し 


word ptr DGBOUF：, 


word ptr DOROUP：^J f 
ax, word ptr DOROUP： 


word ptr DGROUI*:_J, 

ax«word ptr DOROUP： 

dx.15 

dx 

word ptr DGROUP:_J, 

ax,word ptr DOROUP:^ 
dx, 17 
dx 

word ptr DOROUP: J, 

word publ 

word 
2 dup (? 

word 

2 dup (? 

ic 'DATA* 
io *CODB* 


倍， 4 倍程度）の場合は，これまで見てき 
たように，多くのコンパイラで実際の掛け 
算（命令やサブルーチンによる）を避ける 
ために，なんらかの工夫がされています。 
掛け算命令を備えている CPU のコンパイラ 
にはこのような努力はあまりされていない 
のが現状ですが，そのようなコンパイラは 
努力不足を非難されても仕方がないでしょ 
ラ。 

しかし，掛け算をやみくもに加減算やシ 
フトに置き換えるのが必ずしもいい結果を 
卞み出すものではないということも認識し 
ておかなければなりません。たとえば，10 
001咅をする場合，自分自身を10ビット左シ 
フト （1024 倍）したものから，4ビット左 
シフトをしたもの （16 倍）と3ビット左シ 
フト （8 倍）をしたものの和 （24 倍）を引 
くことで答えを得ることができます。 

もっとも，これらの命令の実行時間の合 


乗算 ( XC ) 


inciuae 
• COMM 
.COHH 
.XRRF .. 
.XDEK i 
.TEXT 


[ V t T c, 


HOVI 

HOV1 


E.L 


i ( ue 
11,D0 
00.. J 
.1.D0 


HOVE.L #3,01 
HOVEM.L DO/Dl.-CSP) 
FPACK —CLHUL 

MOVEM.L ISP)*,00/D1 
HOVE.L D0,_J 

HOVE.L ^i,00 
ASL.L l2 t D0 
HOVK.l. DO. J 


novb.L i 
HOVE.L 15,01 
HOVKM.L D0/D1,-<SP 
FPACK _CLMUL 
MOVKM.L (SPU.D0/D 
MOVE. I* D6,_J 


HOVE.L I6.D1 
MOVEM.L D0/D1,-(8P 
FPACK _CLMUL 
HOVKM.L I SIM ♦.DO/D 
MOVE.l. 00. 

MOVK.l. し IU ， 

MOVE.L t7,Dl 
HOVKM.L 0e/Dl. 
FPACK ..CLMUI 
HOVEM.L lSPU,De/D 
MOVE ふ D«,_J 

HOVE.L 
MOVB-L 
HOVKM.L D0/I 
FPACK 一 Cl 

HOVKM.L ISPI4.D0/D 
HOVE.L * 


,i.D0 
19,01 
.D0/D1,- 
CLMUL 
- ISP|4,D< 


MOVE.L 1.00 
MOVE.L MI.D1 
ftOVKM.L D0/D1,-(SP 
FPACK —CLHUL 

MOVEM.L !SPM.D0/D 


HOVB.L 1,06 
MOVE.L 113,01 
HOVKM.L D6/D1,-(8P 
FPACK ^CLMUL 
MOVEM.L 18P)^,D«/D 


MOVE.L 

MOVE.L 


• i.DO 


I16.D1 

00/01,-(81 

_CLMUL 


NOVKH.L 
FPACK _ 

MOVEM.L (SPM,De/D 
HOVE 


HOVBH.L D0/DI,-(8P) 
FPACK 一 CLMUL 
HOVEM.L (SP)4,0e/Dl 
MOVE.L 06, J 


.DATA 

.KVEH 

.KND 
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計が掛け算命令で1000倍をする場合より速 
くなるかどうかはわかりません。特にメモ 
リのウェイト数が多いときは，命令のフェ 
ッチが遅くなる分，命令数が多い加減算と 
シフトの組み合わせは不利になります。こ 
のため，どこら辺で見切りをつけて実際に 
掛け算（命令やサブルーチン）を行ったら 
よいかはかなり難しい問題なのです。ちな 
みに Sun - 3の UNIX 上の C コンパイラは， 
定数値を掛ける場合は絶対に加減算とシフ 
卜の組み合わせを用いて計算しています（少 
な〈とも1000倍まではそうでした)。 


1次元配列の要素にアクセスするための 
方法をアルゴリズム21に，2次元配列の要 
素にアクセスするための方法をアルゴリズ 
ム22に示します。なお，アルゴリズム21や 
22はやたら複_そうですが，添字の値が定 
数で与えられた場合は，コンパイルをする 
時点で要素のサイズとの掛け算ができるの 
で，もっと少ない手順になります。たとえ 
ば， int 型の配列を読む， 
v = a [2] 

という式に対するコードを，ばか正直に， 
move . 1 #2， d 0 



へのアクセス 


asl . 1 拉2， d () 

add . 1 # _ a ， d 0 

move .1 dO ， aO 


高級言語にぉいて配列というデータ構造 
は頻繁に用いられます。当然，アセンブリ 
言語でプロダラミンダを行う場合も配列の 
使用頻度は高いと思われます。アセンブリ 
言語で配列を実現する場合，1次元配列な 
ら何とかなりそうですが，2次元配列，3 
次元配列，4次元配列，……，はどうすれ 
ばよいのでしようか。といっても，現実の 
使用は2次元までの配列でこと足りること 
が多い （》 C は2次元配列までしかサボー 
卜していません） ため， ここでは1次元配 
列と2次元配列の要素へアクセスするため 
のコードを見ることにしましよう。 

リスト4が aC，Turbo C , XC の各コン 
パイラが1次元配列，2次元配列の要素を 
アクセスする場合のコードですが，これら 
はまったく同一のコード（アルゴリズム） 
みたいです。コンパイラのコードの出し方 
がひとつしかないということは，その方法 
が配列要素をアクセスするための常識とい 
うことなのでしよう。 


move . 1 ( a 0 ) ， _v 

とする （68000 の コー ドの場合） タコなコン 
パイラはまずないはずで，通常は， 
move . 1 _a + 8 ， _v 

というコードを出すでしよう。この場合の， 
_a + 8 

の8という値は， 

2(添字の値) X 4( int 型のサイズ) 

という式をコンパイラが計算したものなの 
です。 

アル ゴリズム21と22についてもっと解説 
しましよう。 C 言語において，1次元配列 
はメモリ内に添字が小さい順に割り当てら 
れます0 メモリのアドレス空間は1次元で 
すから，これは自然な割り当てといえます。 
したがって，ある添字を与えたときの配列 
要素は，配列の先頭アドレスから， 

添字 x 配列要素のサイズ（バイト） 
離れたアドレスでアクセスできるのです。 
これがアルゴリズム21の意味です（説明す 
るほどのことでもないか)。 


アルゴリズム10 j = I * I 

J - I 

アルゴリズム11 j = 2 *i 
J 卜 i を11:•，卜左レフト 

アルゴリズム12 j = 2 *i 
j i + I 

アルゴリズム13 | = 3 * i 

Up — i * 2 

(7 jm ； TAll または12> 
j 卜 tap ♦ I 

アルゴリズム 14 j = 4 * i 
J — 丨を 21: •，卜左シフ!* 

アルゴリズム15 j = 4 * I 
tap 卜 • I ♦息 
j t^p ♦ tap 

アルゴリズム 16 j = 5 * i 

tap i * 4 

( F 露: rn 、14 または 15> 
J 卜 tap ♦ l 


アルゴリズム 17. j = 6 * i 

t 騰 p ♦-1♦ i 

tap2 t^p ♦ t^p 
J — tap ♦ imp2 

アルゴリズム 18 j = 6 *i 

tap 1*3 

(7 鳥 : T 9rA13> 
j ♦- tap * 2 

(ァ露 3 MJTA 11 またほ 12> 

アルゴリズム19 j = 7 *i 

t»p ^ 丨を 3 ビ， I •左 V フト （8 倍） 

J tap - I 

アルゴリズム20 j = 7 *i 
tp 1 * 6 

または 18> 

J *- tap ♦ i 


—方，2次元配列をメモリに割り当てる 
場合は，2次元のデータ構造を1次元のメ 
モリに適合するように並べ換えなくてはな 
りません。 C 言語では2次元配列をメモリ 
に割り当てる場合は，行の番号の小さいも 
のが先（低いアドレス）に，同じ行番号で 
は列の番号の小さいものが先になるように 
しています（ちなみに FORTRAN の2;欠元 
配列は，列の番号の小さいものが先に，同 
じ列番号では行の番号の小さいものが先に 
なっている）。たとえば， int 型の 2 X 3 の 
2次元配列， 

int A [2][3] ; 

では，それぞれの要素は，メモリ上に， 


A [0][0] 

第 0 行 

第0列 

A [0][1] 

第 0 行 

第1列 

A [0][2] 

第0行 

第 '2 列 

A [1][0] 

第1行 

第0列 

A [ l ][ l ] 

第1行 

第1列 

A [ l ][2] 

第1行 

第2列 

A [2][0] 

第2行 

第0列 

A [2][ l ] 

第2行 

第1列 

A [2][2] 

第2行 

第2列 


という順序で割り当てられます。 

この順序を見れば，行の番号が i ， 列の 
番号が j であるような2次元配列の要素を 
アクセスするためには，まず最初は行の番 
号に注目して A [ i ][0] の位置（アドレス） 

を求め，そこからは1次元配列で j 番目の 
要素をアクセスするのと同様にすればよい 
ことがわかります。これがアルゴリズム22 
の意味です。ある行番号，たとえば i に対 
する第0列のアドレスは，その直前までの 
要素の個数を計算すれば求まります。また 
アルゴリズム21と22は配列要素を読む場合 
を示していますが，配列に書き込む場合も 
同様です。 

ところで，配列をアクセスするアルゴリ 
ズム自身は1種類しかありませんが，それ 
を実際に行うときのコードの出し方（どう 
いう命令やアドレッシングを用いるか）に 
はいろいろな方法があります。この配列へ 
のアクセスの方法がどのような命令列で実 
現されているのかを見れば，コンパイラ設 
計者のセンスが判ってしまうくらいのバリ 
エーシヨンがあります。もちろん， Z 80 な 
どのアドレッシングモードの種類が少ない 
CPU のコンハ。イラにおいては，誰が考えて 
も同じような命令列になってしまいますが, 
68000などの豊富なアドレッシングモードを 
持つ CPU のコンパイラでは読む人をうなら 
せるようなコードを出してほしいものです 
ね 0 

リスト4で， XC は， 
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HL,( i) 

DE ,20 

USMUL 

DE..b 

HL..OB 


HL.DE 

A,<HL) 

HL 

H，（HU 


3. 配列 （Turbo C ) 


一 TEXT 
DOROUP 


BSS aetfam 
bft l&bei 
_BSS ends 


name ind 

9egoent byt<? public 'CODE* 
tfroup _BSS 

aasune cs:_TEXT,da ： DGROUP.as : DCROUP 
ehdB 

segment word public * DATA * 

label byte 

ends 

word public 
byte 


: byte public 


BSS ， 

CODE* 


1. 配列 （ C 言語） 

int a[10],b[10][10J ； 

int i,j,v ； 

main() 

{ 

v = a 【 3]; 
v = a[i 】； 
v = b[3][4]; 
v = b[i][4 ]； 
v = b[3 】 m; 
v = b[il[j ]； 


2. 配列 （ QfC ) 


::のリストは a C のオブジェクトを 
逆アセンブルして作成したもの* T す 

史»のペースアドレスを100 0 H とした場 ft 

HQU 1000H 

EQU 1014H 

HQU 10DCH 

EQU 16DEH 

EQV 10EOH 


； i*in« 7 
;Line « 


/ov 

ahl 


>OROUP:_v f ax 

ax,word ptr DGROUP ： 

dx,20 

dx 

bx, ax 
ax,word \ 
word ptr 

bx t word ptr DCROUP: 



ax,word ptr DGROUP: 
bx, ax 

ax.word ptr DGROUP:_blbxJ 
word ptr DGROUP し v,ax 


Itext 

_BSS 


BSS 

DATA 

DATA 
一 TEXT 

•TEXT 


segment word public *BSS* 
public _v 
label word 

v (? 


public 

label word 

db 200 dup 

public 
label word 

db 2 dup (? 

public 

label word 

db 20 dap ( 

public 一 j 

label word 

db 2 dup (? 

ends 

segment word public ’DATA* 

label byte 

ends 

segment byte public * CODE r 
public _main 


配列 （ XC ) 


i _a 
1 > 
COMM 

COMM J 
COMM 一 v 
XRKF j 
XDEF ， 
• TEXT 


ADD.L 

MOVE.t 

MOVE.L 

MOVE.L 

MOVE.L 

MOVE.L 

MOVEH.L 

FPACK 

MOVBM.L 


MOVE.L 
MOVEM .I 
FPACK 
MOVEM.L 
ADD.L 


ADD.L 

MOVE.L 

MOVE.L 


； si*e=4 

: M3J l2:3，siEe 


； all ) めアドレス 
； b{3JMI 


e.Di 

/D1,-(SP) 
CLMUL 
； P)^,0U/D1 
い b.DO 


2,00 

120 ♦” 

0.A0 
AO ), メ 

i.DO 

10,Di 

DO/Ol,-(SP) 
_ CLMUL 

^D0/01 


A6,«< 

L2 


たいていの c コンパイラにはアセンブリ 
言語の出力を生成するオプシヨンが備えら 
れています（残念ながら CVC にはないので 
すが）から，それを使えば，出てきたオフ'' 
ジェクトプログラムをデバッガで追うとい 
う火頁わしい操作をしなくてすむでしよう。 

そして， C コンパイラの出力するコード 
を見る場合はできるだけ多くのコンパイラ 
のコードを比較するの がいい と思います。 
実は今回，9種類の C コンパイラのコード 
を比べてみた（もろもろの事情ですべてを 
紹介できませんが）のですが，それぞれの 
出力が少しずつ違っていて，同じことをす 


るのにこんなにもやり方があるのかと大変 
参考になりました。 

また，賢そうに見える（最適化を売り物 
にしてる）コンパイラでも，ある場合では 
どうしようもないコードを出していたり， 
またその逆もあったりで，なかなか楽しい 
時を過ごせたのです（う一ん，少し異常か 
な )。 

さて，来月号では今回得た知識をベース 
に， C 言語とアセンブリ言語とをリンクし 
て活用する特別講義を，もう一度開講する 
予定です。では，今日のところはこのくら 
いでおしまいにしましよう。 


U スト4 


v = b [3][ j ] 

という記述に対して， 
move . 1 _] , dO 

asl . 1 #2 ， dO 

add .1 林120 + _b , dO 
move .1 dO , aO 
move .1( aO) ， _v 

という無難なコードを出していますが ， S 
un - 3の UNIX 上の (デコンパイラ （68010 コ 
ードを出力させたとき）では， 
move . 1 _j , dO 
asl.l #2 , dO 
lea _b + 120 , aO 
move .10( a 0 ， dO .1 ) ， _v 
というコードを出力して，インデックスア 
ドレッシングは このように使うのた'^という 
例を見せてくれるのです（もちろん68000で 
も実行可能なコードですよ)。 

最後に 

ここまで，いくつかの C 言語の記述につ 
いて， C コンパイラがどのようなコードを 
出力するかを見てきました。今回はページ 
数の都合などから，ループ，選択，掛け算， 
配列に関する C 言語の記述に対するコード 
しか紹介することができませんでしたが， 
そのなかにもなるほどとうならせるような 
コードがあったと思います。これ以外の例 
としては， 

構造体のアクセス 
共用体のアクセス 
ビットフイールド 

の記述に対するコードも面白そうなのです 
が，これらについては短いサンプルを作っ 
て，自分で コンパイルしてみることを 勧め 
ます。 

アルゴリズム21 v = A [ i ] 

hp — i 

t«p — tup * 要素の 5 ィスー 
iup2 ^ a[0][0] の 7K * レス 
v <- *(t^p2 + t^p> 

注） *( tmp 2+ tmp ) は tmp 2 +tmp で 計算される 
アドレスで 示される メモリの 内容を示す。 

アルゴリズム22 v = B [ i ][ j ] 

t 羼 p — i 

t 饑 p — t_p * 要素の,ィ广 
t»p — t*p * 宣言した行の数 
(添字の最大値*1> 

tmp2 j 

t«p2 - t»p2 ♦ 要素の 5 ィ 
t«p3 — b[0][0 ] の mx 
v *- *(t«p3 + t«p2 ♦- tap) 

注） * ( tmp 3 + tmp 2 + tmp ) は tmp 3 + tmp 2 + tm 
p で計算されるアドレスで示されるメモリの内容 
を示す。 




1 ,HL“ 


8) 

一吡 


H (H SH =:•)—»)I2U -DH H ) (H 5 H H ) 
6 c L ^ LLEL »L » » w L 1 LESEL*L»» ^ LtEL*L» — ^ 
2 B H t H H D H A H H L ( H ( HDUDHAKHLt HHDHAMHL( 

o u u D DDDDDNDDD D D D DALDD D N D D D DDDDDNDDD 
E p L L L A L A L I L L L L-3 し LCL A し.-•し t L L A L A u 1 L t L 
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® 特集 実践 l 言語からの誘惑 


Appendix C 言語簡易リファレンス 

C 言語には覚えなければいけない書式や文法に関する約束ごとはそれほど多く 
はありません。逆にいえば文法よりも，プログラムの動作に関する本質的な理 
解が重要ということです0プログラミング時や，掲載されたプログラムテキス 
卜を読む場合，必要に応じてこのリファレンスを参照するとよいでしょう0 


このリファレンスは XC の書式に基づいて作成されたもので，ランゲージシリー 
ズ （ aC ) や SmallC といったサブセツト版の C コンパイラではサボートされて 
いない機能もあるのでご注意ください。 


関数 プログラムは関数の集合として表現されます。各関数の 

処理は丨と I でく くられた内容を実行したあと呼び出さ 
れたところに復帰します。また，すべての関数は個別に 
コンパイル することができますが，プログラムには最初 
に実行される main 関数がどこかにあることが必要です。 


関数の宣言 （フォワード宣言） 

関数の型関数名（引数の型）； 

(リ I 数の型宣言は省略口]:。宣言したものを，特にプロトタイプ宣 B と 
いうこともある） 

関数の定義 

関数の型関数名（引数リスト） 

引数宣言 

I 

変数の宣言 
関数の本体 

I 

関数 main 

プ ログ ラムは必ずこの main () から実行される。 

void maimargc , argv , envp ) 
int argc ; 

char * argv []; 

char 氺 envp []; 

引数の意味は 

argc . コマン ドライ ンパラメータの個数 

argv ……各コマンドラインパラメータを桁すポインタの!" k ! 列 

envp ……オペレーテイングシステムの環境変数を指すボインタの配列 


文 変数の宣言や関数呼び出し，代入文などの式には必ず； 

を付ける必要があります。また， C には行の概念はなく， 
;によって複数の文を列記することも可能です。 


空文： 

単文式； 

複文 I 文文 … 文 I 


制御構造 C にはプログラムの流れを管理するものとして，次のよ 

うな制御文が用意されています。同時にいくつもの文を 
制御したい場合には複文を用いることができ，空ループ 
などを作りたい場合には空文を使用します。 


while ( 式）文 

忒の値が真である問，文を繰り返し実行する。 

do 文 while ( 式）； 

文を実行し，式の値が真であれば繰り返す。 
for ( 初期化式；条件式；ループ文）文 

初期化式を龙行し，そのあと条件式，文，ループ文の順に，条件式の 
値が真である間繰り返し評価-実行する。 
break ; 


ループを強制的に終わらせる。 

continue : 

次の繰り返しの敁初に次:行を移す。 

if ( 式）文 1 else 文 2 

式の値が真なら文1を，偽なら义2を次:行する。 

switch ( 式 ）| 

case 定数式：文 
case 定数式：文 

default : 文 

I 

式の値が定数式と•致する case 以降（どの定数式とも•致しなければ， 
default 以降）の文をすべて実行する。ふつうは文の敁後に break 文を 
入れて，実行が終わるとブロックの外に脱出できるようにする。 

return ( 式）； 
return ; 

関数の戻り値を式の値として関数を終丫させる。の赉式は void 
型関数のもの。 

goto ラベル 

無条件にラベルの場所へジャンプする。ラベルは M じ関数の中にな〈 
てはならない。 


データ型 C では豊富なデータ型をサポートしていますが，最もよ 

く使われるのは char 型と int 型で，これに double 型くらい 
を覚えておけばよいでしよう。 


整数型 

符号付き 

char (文字型) 
int 

short int ( short ) 
long int ( long ) 

符分なし （: iK 輅数） 

unsigned char (文字型} 
unsigned int ( unsigned ) 
unsigned short int (unsigned short ) 
unsigned long int (unsigned long ) 

浮動小数点型 
float 
double 

その他 

enum (列挙型） 
void (戻り値がない関数の型） 

注）上記のビット長は XC に準拠したものです。なお，8ビット機または 
8086用の C の場合， int 型は16ビットとなります。 


定数表現 C で扱う定数には次のようなものがあり，それぞれに特 

有の表記方法がとられています。 


整数定数 （ int 型になるが，定数の終わりに L か1を加えると long 型になる） 
10進数 nnn ( 0で始まってはいけない） n は数字。 

8進数 Onnn 
16進数 Oxnnn 


8ビット 
32(1(3) ビット 
16ビット 
32ビット 

8ビット 
32ビット 
16ビット 
32ビット 

32ビット 
64ビット 
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浮動小数点定数 （ double 型になる） 

小数点表現 nn . nnn 
指数表現 nn . nnE 土 nn 
文字定数 （ char 型になる） 

* 1パイトの文字’文字にはエスケープシーケンスも含まれる。 
文字列定数 （ char 型の配列になる） 

"文字列"エスケープシーケンスを含んでよい0 


unsigned メンバ名：定数式； 
構造体の参照 

構造体変数名.メンバ名 

構造体へのポインタ変数名一>メンバ名 


スケープシーケンス 

…特殊な文字の表現に使う。1バイト。 

¥n 

復帰改行 

¥t 

水平タブ 

¥v 

垂直タブ 

¥b 

バック スペース 

¥r 

復帰 

¥f 

改ページ 

¥a 

警告べル 

¥* 

シングルクオーテーシヨン （’） 

¥，， 

ダブルクオーテーシヨン （”） 

V ¥ 

円記号 （¥) 

¥nnn 

8進数で表された ASCII 文字 

¥ xnnn (¥ Xnnn ) 

16進数で表された ASCII 文字 


共用体 同じ領域に格納された値を，複数の異なる変数名で共 

用できるようにするものです。それぞれの変数は違う 
型であってもかまいません。 


共用体の宣言 

union タグ名| メンバ宣言リスト|変数名: 
タグ名は構造体の型名。 

タグ名，変数名，初期化要素は省略可。 
ビットフィールドのす旨定は不可。 

共用体の参照 

共用体変数名.メンバ名 

共用体へのボインタ変数名一>メンバ名 


!初期化要素 I ; 


変数の宣言 変数は使用する前に前記のデータ型を宣言しなけれは 
なりません。ただし先頭の記憶クラスは，多くの場合 
省略することができます。 


演算子 C には非常に多くの演算子が用意されています。これ 

らのすべてを覚えておく必要はありませんが，いずれ 
もブログラミングの実情に合わせて作られたものです。 
特にインクリメント•デクリメント演算子は，プログ 
ラマにとって利用効果の高いものでしよう。 


算術演算子（演算の結果を忒の侦とする〉 


enum 型以外 


a + b 

加算 

( a 足す M を行う。 

記憶クラス型名変数名=初期化定数，変数名， •• 

•, 変数名； 

a — b 

減算 

( a 引く b > を行う。 

enum 型 


一 a 

負符号をつける（マイナス a )。 

enum タグ名！識別子リスト丨変数名； 


a * b 

乗算 

( a 掛ける b ) を行う。 

変数名を朽略すると，型宣言になる。 


a/b 

除算 

U 割る b ) を行う。 



a%b 

剰余 

( a を b で割った余り）をとる。 


記憶クラス C では変数の記憶方法によって，関数が呼び出された 

ときにだけメモリ上のスタック領域に変数が発生する 
動的な変数と，メモリに常駐する静的な変数，そして 
レジスタに直接記憶するレジスタ変数があります。ま 
た，変数が通用する範囲も大域的なものと局所的なも 
のとに分かれます。これらの概念をまとめたものが次 
の 4 つの記憶クラスです。 


関係演算子（式の値は，與のとき1で，偽のとき 0) 


a = = b 
a ! = b 
a < b 
a < = b 
a > b 
a > = b 


a と b は等しい。 
a と b は等しくない 
a は b より小さい。 
a は b 以ドである。 
a は b より火きい。 
a は b 以上.である。 


論理演算子（式の値は間係演算子と同じ。〇以外は真とみなす） 


範1用 


auto 

内部レベル 

メモリ上， 

動的 

宣言ブロック内のみ 

a && b 

論理褙 ( AND ： a が真かつ b も真）をとる。 

register 

内部レベル 

レジスタ内 

宣言ブロック内のみ 

a II b 

論理和 （ OR : a が與または b が真）をとる。 

static 

任意のレベル 

メモリ上， 

静的 

宣言ブロック内のみ 

! a 

論理否定 (NOT : a が偽）をとる。 

extern 

任意のレベル 

メモリ上， 

静的 

プロ グラムのすべての 

インクリメント 

•デクリメント演算子 

1 





a + + 

a を式の値とし ， a +1の値を a に代入する。 

typedef 

型名の定義 




+ + a 

a +1 の値を a に代入し，それを式の値とする。 


酉己歹 IJ 同じデータ型の要素の集合です。配列の添え字には [] 

が利用されます。 BASIC と違って A [ I 0] と宣言すると 
0 ~ 9 の丨〇個が確保されます。 


a a を式の値とし ， a — 1の値を a に代入する。 

--a a - 1の値を a に代入し，それを式の値とする。 

ビット演算子（結果を式の値とする） 


配列の宜言 

配列の型配列名[要素数][要素数]…[要素数] ={ 初期化要素 I ; 

要素数と初期化要素は定数式でなくてはならない。なお，初期化要素 
は省略可。 


構造体 型の異なる複数の変数や配列を組み合わせた集合を， 

ひとつの新しいデータ単位として扱うというものです。 


ビットごとの論理稂 ( AND ) をとる。 

ットごとの論理和 （ OR ) をとる。 

ットごとの排他的論理和 （ XOR ) をとる。 
ビットごとに反転する （NOT )〇 

a の値を b ビット右にシフトし，式の値とする。 
a の値を b ビット左にシフトし，式の値とする。 


a&b 
alb 
a 

—a 

シフト演算子 
a >> b 
a << b 

代入演算子 （ C では代入も式として扱う。代入した値(右辺値）を式の値とする） 


構造体の宜言 

struct タグ名 I メンバ名；…；メンパ名；丨変数名== I 初期化要素 I ; 

タグ名は構造体の型名。 

タグ名，変数名，初期化要素は省略可。 

ビットフィールドでメンバを宣言できる。書式は次のとおり。 


a = b b の値を a に代入す る。 

a + = b a + b の値を a に代入する。 

a — =b a _ b の値を a に代入す る。 

a * = b a * b の値を a に代入する。 

a /= b a / b の値を a に代入す る。 

a %= b a % b の値を a に代入する。 

a &= b a & b の値を a に代入する。 
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a I =b a I b の値を a に代:入する。 

a *= b a ^ b の値を a に代入する。 

a >>= b a >> b の値を a に代入する。 

a << = b a く< b の値を a に代入する。 

条件演算子 

a ? b ： c a を評価し，真なら b ， 偽なら c を式の値とする。 

カンマ演算子（逐次評価） 

a ， b， …， c 式を左から順に評価し，锒後に評価した値を式の値とする。 

ァドレス演算子と間接演算子 

&a a のアドレスを式のとする。 

* a ボインタ変数 a が指すアドレスの内容を式の値とする。 

メンバ参照演算子（参照した値を式の値とする） 


a . b 
a —> b 
sizeof 演算子 
sizeof a 

型キャスト演算子 
(型名 ） a 


溝造体•共用体 a のメンバ b を参照する。 

满造体*共用体 a へのポインタからメンバ b を参照する。 

a に割り当てられている記憶領域のバイト数を値とする。 

a の値を（型名）の型に変換し，式の値とする。 



C ではコンパイルに先立って，さまざまなマク 
口定義を展開したり，外部ファイルを取り込ん 
だりする前処理が行われます。このプリプロセ 
ツサ機能を生かすことにより， ソースリス トを 
簡潔な読みやすいものにできるわけです。 


マクロ 定義 

# define 識別子文字列 


ファイル等に変更することも可能です。 


1文字入出力 

プリプロセッサで “ conio . h ” をインクルードしてお〈〇 
putch ( c ) ; 

•服 ： int 

戻り値 ： void (なし） 

機能：コンソールに文字 c を出力する。 
getch (); 
getche () ; 

引数：なし 
戻り値 ： int 

機能： コンソールから 1文字読み込み，その値を返す。 
getche には入カエコーバックあり。 

文字列入出力 

プリプロセッサで “ stdio . h ” をインクルードしておく 0 
printf ( format _ stnng [, arg , ...]); 

リ I 数： ( format _ string ) 散式文字列へのポインタ 

(ふつうは文字列を直接書く〉 

( arg ) 任意の型 

戻り値 ： int (出力した文字数を返す） 

機能：連続した文字を標準出力 stdout に出力する。 

引数 arg があれば， format _ string に指定した書式で出力する。 
表示文字列と， arg の教式文字列を混在させることができる。 
書式はさまざまに指定できるが，主な例を以下に示す。 

printf ("変数の値はそれぞれ％ d , % d です”， decl , dec 2) ; 
符号付き10進鲢数を出力する。 


林 define 識別子（引数リスト）文字列 

ソースプログラム 中の識別子を文字列で1き換える。 
文字列は杓略可だが，その場合識別子は削除される。 

林 undef 識別子 

^define によるマクロ定義を取り消す。 

# define — # undef で，マクロ定義の範ド H を指定できる。 

ファイル取り込み 

# include “ファイル名” 

林 include く ファイル名〉 

ファイル名で指定されたインクルードファイルを取り込む0 

条件付きコンパイル 



コンパイル抑止条件式 


ブロック； 

#elif 

コンパイル抑止条件式 


ブロック； 

#elif 

コンパイル抑止条件式 

# endif 

ブロック； 


コンパイ ル抑止条件式は定数式。 

この値が輿 <0以外〉であるブロックを コンパイル する。 
defined 識別子 

コンパイ ル仰止条件•式として使う。 

識別子がすでに# define で定義されていれば真になる。 

ttifdef 識別子 
ttifndef 識別子 

# ifdef は# if defined と同じ。# ifndef はその逆。 

行制御 

#line 定数“ファイル名” 

コンパイラ内部に記憶されている行番号とファイル名を変更する。 


代表的な入出力関数 よく使用される基本的な入出力関数につ 

いてまとめておきましよう。入出力対象 
は特に指定しなければコンソールになり 
ます。つまり，キーボードが標準入力で 
スクリーンが標準出力になるわけです。 
ただし，入出カリダイレクションにより， 


printf 5 u 個のフアイルが存在します”， dec ) ; 

符号なし10進整数を5桁の欄に出力する。 
printf (“アドレス ：%. 4 X (, f hex ) ; 

符号なし16進整数を4桁の欄に出力する。 
p 「 intf (“％#.10 f が解です”， dbl ); 

double 値を小数点以下10桁まで出力する。 
p 「 intf (“ あなたの体重は％ e グラムです”， dbl ); 

double 値を指数表現で出力する。 
p 「 intf (“ 押されたキーは％ c です”， chr ) : 

1文字出力する。 
printf (“氏名：％. 8 s ”， str ) ; 

文字列を M 大 8 文字出力する。 

この str はポインタになっている。 
scanf ( format_stnng [, pointer , ; 

引数： （ format _ string ) 文字列へのポインタ（ふつうは文字列を 
鎌帯く） 

( pointer ) 読み込みたい変数へのポインタ 

戻り値 ： int (割り付けた領域の数を返す） 

機能：標準入力 stdin からデータを読み込み， format _ string で指定さ 
れた書式にしたがって変換し， pointer の示す領域に格納する 
《つまり変踔の値として読み込む)。 

書式指定の例を列挙する。 
scanf (” •’） ； 

空白文字を読み飛ばす。 

空白文字は，空白’’ • タブ’ ¥ t ’ •改行’ ¥ n ’。 
scanf (“ % x '\ & dec , & hex ); 

10 進， 16 進輅数を読み込む。 
scanf (“ ％ e ”，& flo ) ; 

float 値を読み込む。 
scanf (“ ％ E ”，& dbl ) ; 

double 値を読み込む。 
scanf (“ ％ c ”，& ch 「） ； 

1文字を読み込む。 
scanf (“ ％8 s ”， str ) ; 

文字列を最大8文字読み込む。 

str はポインタだから，&をつけてはいけない。 
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〇誠^ ES 講座 PRQ 塞 88K 第/回 

まずは printf よ ! D 始めよ 


この 「 C 調言語講座 PR 〇 -68 K 」 では， 「 C の文法なんぞ知らな<ても，ますは C 
を使ろこと。そろすりやなんとかなるものさ」なるいつもの名調子で，祝一平氏 
が手取り足取り4の字固め，スト□ンヴスタイルで C 言語術を S 日伝授してくれ 
るそろです。さてさて，いつだいどんな必殺技が飛び出すのでしよろか。 



満開製作所 


Iwai Ippei 

祝一平 


今月から C compiler PRO -68 K (以下 XC > を対象とした C 言語 
の講座を開くことになったわけである。 

んが，最初に断っておくが私は C の文法に関してはそれほど詳 
しくはない。最近も， C の文法に関していろいろ聞かれたことが 
あったのだが，いざ答えようとして，自分の無知さにあきれかえ 
ってしまった。それもそうなのである。実のところ，私がまとも 
に読んだ C の本といえば，『プログラミング言語 C 』（ B . W . カーニ 
ハン， D . M . リッチー著，共立出版，2,500円），通称 「 K & R の教科 
書 j だけなのである（そういえば，最初この本を読んだときは感 
動したっけ)。ちなみに，この本の日本語版は100刷を越えるとい 
う，とんでもないベストセラーになっている。私の持っているも 
のは第8刷である。これはもしかすると，自慢になるのだろ一か。 

しかし，言わせてもらえれば，文法なんぞは，基本的にはうろ 
覚えでもいいのである。大事なのは，どういう プログラムを 作る 
かなのである。英語の試験で満点を取ったとしても，その英語を 
使って何もしなければただの徒労なのである。文法なんぞはいく 
ら知っていたとしてもだめなのだ。何が必要かを知り，設計し， 
アルゴリズムを 考え， コーディング，デバッグ する。これが問題 
なのである。 

これから連載を始めるにしては，いきなりい一かげんであるが， 
これぞ C 調言語術の奥義なのだ。文法の勉強などというシケたこ 
とは，さっさと要領よく片づけてしまい，肝心の「このプロダラ 
ム，面白いでしよ」を追及すべきなのだ。 

何が面白いかということに関してはさまざまな異論があるだろ 
うが，やっぱり，せっかく X 68000 なんだから，やっぱり X 68000 
なのである。よって，本連載中にはときどき X 68000 でしか動かな 
いプログラムも出没する予定である。ある人は， 「 C の連載だなん 
て言って，本当は“試験に出る X 68000” にするつもりなんじゃな 
いですか」と言っていたが，平分当たっている。ただし，私の考 
えとしては，1/4当たってるぐらいでとどめておきたいと思って 
いる。 



最近は本屋にも C の本がかなり積まれているのを見かけるよう 
になった。極論すれば，並んでいる本は C の入門書か，さもなく 
ば （98 の） MS - DOS の入門書だと言ってもい一ぐらいである。 


そういえば，何年か前のことであるが， 「 BASIC の次は Pascal 
の時代になるのだっ。さあ来る今来る j などと真面目に論じられ 
ていた時代があった。今から思えば，どうもパソコン雑誌が，「な 
一るほど， Pascal ねえ。ふむふむ，そいじや来月号の特集は“ Pa 
seal の時代がやって来た”なんての，どう？」のノリによって， 
読者をおいてけぼりにしたまま大ボケを演じてしまったのではな 


かったかと思う。 

で，現在の C ブームであるが，どうやら BASIC に取って代わる 
という感じは全然ない。その要因としては，もはや BASIC はなく 
ならないだろう，という認識がある。つまり， C は上級者用の言 
語，もしくはアセンブラの代替品という考えのようである。 C は 
BASIC の上位として，別の地位を確保しつつあるのではないか。 


C の特徴 


C は BASIC や Pascal より使い方が難しい言語である。そして実 
行速度は Pascal より明ら力*に速く，また柔軟性に富んでいる。 

C がどれぐらい柔軟かという例が，リスト0である。これはど 
一 ゆ ー ブログラム かというと，暴走する プログラム なのである。 
ただし， X 68000 ではメモリにスーパーバイザ領域つ一もんがある 
ので，この プログラムを 走らせると，画面の中央にすでに皆さん 
には顔馴染みのことと思われる， 

ア ドレスエラーが 発生しました 

という心温まるメッセージが現れて止まってくれる。し力*しほか 
の パソコンでは， 普通はそこまで面倒は見てくれないので，やがて 
はメモリが0で埋め尽くされ，めでたく暴走ということになる。 

よ一するに C という言語はこんなに簡単なプロダラムで暴走して 
しまうくらい柔軟なのである。 

そのほかにも C の特徴としては，「実行時のエラーチェックをし 
ない」ということがある。先ほどのリスト0もそうなのだが，こ 
こではもっと身近な例である配列の添え字の範囲のチェックを考 
えてみる。たとえば BASIC でなら， 

10 DIM A (10) 

20 PRINT A (20) 


を実行したならば，たちまち エラーが 発生しプログラムの実行が 
終わるであろう〇これは Fortran や Pascal などのコンパイル言語 
でも基本的には同じである。コンパイル時には問題がなくても， 
いざ実行するとランタイム エラーと いう エラーが 発生するのであ 
る（例外もあるが)。 

しかし C では，基本的にはエラーチェックはされない。である 
からして， 

char c [ l 0] 
c [100]=， A ， ； 

などとしてもエラ-は発生せ HQQI 
ず，ただ単にメモリのどこか 

に’ A ’ のアスキーコードの 41 h iyain( ) char *p; 

が書き込まれるだけである。 0; 

たまたまそこがプログラムの } 

一部だとすると，もしもあな 
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たが幸運だったなら，プログラムは始走するであろう C 逆に，も 
しもあなたの LUCK POINT が低ければ，何度ソースプログラム 
を見ても発見できないバグに悩まされることになる可能性が高い。 
実は， C が上級者用の言語だというのも，ここらへんに根拠があ 
る。ただし，最近ではパソコン上でも C のデバッグ環境が整いつ 
つあるので，エラーが発見できるようにしてコンパイルし，ちゃ 
んとくことが確認されたらエラーチェックなしでコンパイルす 
るということも可能になっているよ一である。 

また，本当の清〈正しい C では，プログラム中でちゃんとアセ 
ンブラが使えるようになっているので （ XC もそうなっている。た 
だし， XI のランゲージシリーズの C : aC はそうなっていないの 
で，濁り悪しき C と言わざるを得ない。もっともそれによって， 
使いやすくなっているという面もあるのだが)，柔軟性という点で 
はほかの高級言語の比ではないのである。 

イントロダクシヨンの最後に，基本方針を述べておこう。 

参考書はまずは前述の 「 K & R の教科書」である。 「 K & R の75ペー 
ジ」などのようにして参照するであろう。はっきり言って，いやし 
くも C を使わんと欲する者は， K & R を叔^ち，ひととおりは目を通 
しておくべきであろう。それと，当然のように XC に付属のマニ 
ュアル群も参考書となる0また，サンプルプログラムなどは特に 
違うと明記していない限り PDS である。 


今月のテーマ 


今月は C における基本中の基本であるところの， printf をやる 
のである。で，そのために，なんと X-BASIC の外部関数を作っ 
てしまって， BASIC から printf を使えるようにしてしまうのであ 
る（ただしちょっと制限がある力す，それはあとで述べる)。 C である 


表1 XC の書式指定 


type の値 

引値 

内 容 

°/od 

整数型 

符号っき10進整数 

°/ou 

整数型 

符号なし10進整数 

%〇 

整数型 

符号なしの8進整数 

%x 

整数型 

符号なしの“ abcdef n を使った16進数 

%X 

整数型 

符号なしの“ ABCDEF” を使った16進整数 


double 型 

double 値を[一 ]ddd. ddd の小数点形式に変換して 
出力します 

小数点以下の桁数は digit により指定されます 

%e 

double 型 

double 値を[一] d. ddde [ - ]ddd の指数形式に変換 
して出力する 

小数点以下の桁数は digit により指定される 

%E 

double 型 

“e” の代わりに "E” を使う以外は e フォーマット 
と同じ 

%g 

double 型 

double 値を， f フォーマット（小数点形式）また 
は e フォーマット（指数形式）のうち，結果が短 
<なる形式に変換して出力する 
指数部が 一4以下または桁数が digit よりも大きく 
なる場合は e フォーマットになる 

%G 

double 型 

指数の前に“ e "の代わりに“ E” が使われる以外は 
g フォーマットと同じ 

%c 

文字 

1文字 

%s 

文字列 

ヌル 文字 (-voo で終了する文字列 
または digit の数の文字列 



からには，いかに簡単なプログラムであっても，エディタできち 
んとソースを作ってコンパイラにかけなければならない。そこへ 
もってきて初心者の場合には山ほど動かないプログラムを書いて 
しまうわけであるから，これはとてつもなく効率が悪いのである。 
そんなわけで，手軽に使える BASIC 上で C の基本である printf を 
練習できれば極楽であろう。また X 68000 ユーザーであれば XC を 
持っていなくても同等の練習ができるという特典もあるのでよろ 
しく。 

さて， printf の“ f” は「フォーマット指定付き」ということで 
ある。これは BASIC でいうところの print using のようなもんだ。 
K&R で最初に出てくるプログラムが 
main () 

I 

printf (’’ hello , world ¥ n ”） ； 

I 

であることからもわかるように，この printf は C では基本中の基 
本なのである。これの詳しい説明は K & R の158ページからとなっ 
ている。で， printf の一番簡単な形式が，先刻の， 
printf (文字列）； 

という形である。もっとも，これだけだったならば，たんなる文 
字列表示関数にすぎない。そこで， printf では，この第1引数の 
文字列の中に 

「あとに並んでいる文字列とか数値も表示してね」 

という指定を入れておくことができるようになっている。すな 
わち， printf の一般的な形式は， 

printf (書式指定文字列，表示されるもの， .) ; 

となっているのだ。で，その指定は「％で始まる文字列」という 
ことになっている。 XC の場合，具体的には表1である（ほかの C で 
は違うこともある。 C では， printf は必須ミネラルであるにもか 
かわらず，立場的にはライブラリのひとつにすぎないので，厳密 
な規定はないのである。 K & R に書かれている書式指定は， XC に 
あるものよりもずっと少ない。 K & R は最低限の要求にすぎないの 
だ)。 

この中で一番火事なのは 「％ d 」 である。これ以外では，覚えて 
おくべきなのは， 「％ cj 「％ s 」 r % fj の3つである。これ以外に 
は 「％ u 」 が，かろうじて使うことがあるかないかであろう。 

たいていはここまで知っていれば不自山することはないであろ 
う。しかし printf では，もっと細かな書式指定ができるようにな 
っている。その一般形式を表2に示しておこう。しかし，はっき 
り言うが， 

表2に示してあることは，別に覚える必要はない 
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表 2-1 

一般的なフォーマット , 

%[ flag ][ length ] [. digit ] [{ L | ]type 

“％”と type 以外は省略可能。 

フォーマツト指定の各フイールドの内容は次のとおり。. 


フイ ー ルド 

内 容 

% 

書式指定の始まりを示す 
省略できない 

flag 

記号，空白，小数点，8進，16進などの出力と表示を指 
定する 

length 

出力文字の最小桁数を指示する 

digit 

最小文字数，または小数点以下の桁数を指定する 

1， し 

引数が long 型であることを示す （ XC ではあってもなくて 
も同じ） 

type 

変換のタイプを指定する 


“％” のうしろに format _ string として無意味な文字があると，そのまま出力 
される。 


表 2-3 
[length] 

出力する最小文字数を10進整数で指定する。 

出力する文字数が length よりも少ない場合は， flag に従い右詰め，もしく 
は左詰めで出力する。 

出力する文字数が length よりも多い場合，または length が指定されていな 
い場合は，すべての文字を出力する。 

length の先頭に “0” がついている場合，“0” で空きを埋める 
length を引数で指定する場合には，ァスタリスク （*) を使用する 。 length 
の引数は，フォーマット出力する値の前になければならない。 

のである（覚えなくてもいいことを覚えずにすましてしまうとい 
うことも大事なことなのである)。知っていて損しないのが「桁数 
の指定」と「空白の代わりに “0” を使う指定 J であるが，これ 
らとて知らなくても別に困ることもないだ'ろう。 

そいでもって，これはすべてに通ずることなのであるが，やはり 
習うより慣れろである。そこでさっさと今月のプログラムに突入 
するのであった。 

リスト5は X - BASIC 用に printf () を組み込んでしまうものであ 
る。しかし，170行を見るとわかるように，正確には printf (標準 
出力へプリントする）ではなく ， cprintf (画面へプリントする） 
なのである。 BASIC には標準出力という考え方がないので（むっ） 
printf を呼び出すと バス エラーなどが起きるであろう。 

当然このプログラムのミソは170行にある 「JSR — cprintfj な 
のである。 BASIC の外部関数の中から， C のライブラリを呼んでも 
大丈夫なのかという疑問が出るかもしれないが，実際に大丈夫な 
のであるから，きっと大丈夫なのに違いない。この手を使えば， 
もっと変でオイシイこともできるかもしれないから，工夫してい 
ただきたい。ダンプリストがリスト6であるから， C を持ってい 
ない人はシコシコと打ち込んでいただきたいのだが，はっきり言 
って， XC は「買い」である。最適化が甘いなどの問題があるが， 
BASIC コンパイラも付いて39,800円，100 g 当たり880円というの 
は，かなりの ハイコス トパフ オー マンスであろう0 
てなとこで，プログラムの使い方に入るのである。 

1) ソースを， printf . s のファイル名で入力する 0 

2) cc / Zprintf . fnc printi . s 


表 2-2 


[ flag ] 


flag の値 

内 容 

- 

length の桁数内で左詰めで出力する 
省略すると右詰めで出力する 

+ 

出力数値が正の数のときは“ + ”を，負の数のと 
きは“一”をつけて出力する 
省略すると，負の数のときのみ"一"をつけ，正 
の数のときは符号をつけない 

空白 

出力数値が正の数のときは丨文字分の空白を，負 

の数のときは“一”をつけない 

省略すると，負の数のときのみ“一”をつけ，正 

の数のときは空白をつけない 

flag に“ + ”が指定されているときは，この指定 

は無効になる 


type の値が〇， X ， X のとき，出力数値の先頭に0， 

Ox , 0 X をつける 
省略すると何もつけない 

type の値が f ， e , E のとき， digit で指定した桁 
数の小数点以下の数を表示する 
小数点以下に数字がないときは0を表示する 
省略すると，小数点以下に数字があるときのみ小 
数点以下を表示する 

type の値が g ， G のとき， digit で指定した析数の 
小数点以下の数を表示し，切り捨てや余分な0の 
削除は行わない 

省略すると，小数点以下に数字があるときのみ小 
数点以下を表示し，余分な0は削除する 

type の値が c ， d , u ， s のときは無視される 


表 2-4 


[digit] 

digit は出力する最大文字数または小数点以下の桁数を正の10進数の整数 
で指定する 

digit を引数で指定する場合には，アスタリスク （*) を使用する。 digit の 

引数は，フォーマット出力する値の前になければならない。 

digit の指定方法，および省略した場合のデフオルト値は次のとおり。 


type の値 

内 容 


出力する最小桁を指定する 

d 

U 

引数 arg の桁数が digit より少ない場合は 0 を付加 
する 

0 

X 

桁数が digit を超えても値の切リ捨ては行われず， 
そのまま出力する 

X 

省略したとき， 0 を指定したとき，またはピリオ 
ドのみが記述されたときは"丨”とみなす 

t 

e 

E 

小数点以下の桁数を指定する 
出力する最後の桁は四捨五入される 
省略したときは 6 桁になる 

0を指定したとき，またはピリオドのみが記述さ 
れたときは，小数点のみを出力し，小数点以下の 
数字を切り捨てる 


e 

出力する有効値の最大桁数を指定する 

G 

省略したときは有効値のすべてを出力する 

C 

無効 


出力する最大文字数を指定する 

s 

省略したときは，文字列の末尾のヌル文字に達す 
るまで出力する 


100 Oh ! X 1988.7. 





























■ oom サンプル 
10 int x0 , y0 

20 x0=pos : y0=c8rlin-l : print:print:print 
30 /* 

40 int i(0) 

50 char c(0) 

60 str s(0) 

70 float f(0) 

80 /* 

90 i(0)=108 
100 c(0)= , @ , 

110 s(0) = ， . 鍬餃鳍黪鲽 " 

120 f(0)=3. 141592 65# 

130 printf("%d %c %a %f ",i,c,s,f> 

140 locate x0,y0 


| サンプル 3 


| サンプル 2 


10 str s(0) 

20 s(0)="hello, world" 

30 printf<. ，： X10s:¥n" ， s> 

40 printfC':%-10a ： ¥n M ,s) 

50 printf(" :% 20s:¥n",s) 

60 printf(" ： %-20s ： ¥n",s) 

70 printf(" :% 20.10s:¥n",s) 
80 prinbf(":%-20.10s ： ¥n",s) 
90 pri*ntif ( " .10s : ¥n" , s ) 

100 locate pos,carlin+10 


| サンプル 4 


表 3 XC のエスケープ文字列 


¥n 

復帰改行 ( OaH ) 

¥t 

水平タブ (09 h ) 

¥v 

垂直タブ ( ObH ) 

¥b 

バックスペース （08 h ) 

¥r 

復帰 (0 d H ) 

¥f 

改ページ （ OCH ) 

¥a 

瞥告ベルを鳴らす （？） 

¥， 

シングルクオーテーシヨン (27 h ) 


ダブルクオーテーシヨン （22 h ) 

¥¥ 

円記号 (5 ch ) 

¥nnn 

8進数で表された ASCII 文字 

¥xnn または ¥Xnn 

16進数で表された ASCII 文字 


10 int x0,y0 

20 x0=pos :y0=csrlin-l : print : print : print. 
30 /* 

40 int 1(0),d(0) 

50 float f(0) 

60 /本 

70 l(0)=20 ： d(0)=10 
80 f(0)=3.14159265# 

90 printf f, ,1,d, f) 

100 locate x0,y0 


10 int x0,y0 

20 x0=pos : y0=carlin-l : print:print:print 
30 /本 

40 int i(0),j(0),k(0) 

50 /本 

60 i(0)=&H4126 
70 j(0)=&HFEF 
80 k(0)=&H88 

90 printf ( "%04x¥n%04x¥n%04x¥n , ' ,i, j,k) 
100 locate x0,y0 


で コンパイル する。 as ではないことに注意。できあがった pr 
intf . fnc は BASIC . X と间じディレクトリにおいておくこと。 
3) BASIC . CNF に， 

FUNC = PRINTF 
の1行を付け加える。 

これで BASIC を起動すれば， printf が使えるわけだ。 XC を持っ 
てない人はダンプリストを打ち込み printf . fnc のファイル名でセ 
ーブし同様なことをすべし。 
printf の使い方である力す，形式は 

printf (str L , aryl ] し aryl ][, aryl ][, aryl ][, aryl ][, aryl ] 
[, aryl ][, aryl ][, aryl ]) 

である。表示される引数は 9 個までである。このとき， 
printf ( s , 1 ,, k ) 

のような，パラメータの飛びは許されない。 

で、，いよいよ具体的なサンプルがリスト1〜4である0このよう 
に，いちいち配列を宣言し，それに代入してから printf に渡さな 
ければいけないというのは，かなりめんどくさいのであるが，困 
つたことに X - BASIC では， int ， char ， str , float を，型にかかわ 
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今月から新しくスタートした 「 C 調言 
語講座 PRO -68 K 」 ですが，ちょっとタイ 
トルの祝一平氏の名前のところを見てく 
ださい。「満開製作所 j とありますね。そ 
うです，察しのいい方ならお気づきでし 
ょうが，この連載は祝氏が発行している 
ディスクマガジン「電脳倶楽部」に同時 
連載されることと相成ったのです。 

さて，本文中にもあるように，この講 
座では 「 K & R 」 をサブテキストとして平然 
と引用することとなっています。なにし 
ろすベての C プログラマが愛読するとい 
われるバイブルです。間違いなくお勧め 
できる丨冊としてご紹介しておきましょ 
う。 （編） 


らず外部関数に渡すには，この方法しかないらしいのである。 

つねづね前から思っていたのだが，どうも X - BASIC というの 
は， ナニ である。「こんなこといいな，できたらいいな」がドラえ 
もんの4次元ポケットだとすれば， X - BASIC のほうは，「低次元 
はらがけ」ではないかと思ったりもする。 

さて，リスト1が基本型，リスト2が K & R の159ページに載っ 
ている，文字列表示に桁数指定をした例である。注意点は，100行 
の locate 文である。 BASIC のカーソル移動は独自なので，外部関 
数で文字を表示すると，両者はガッチヤンコして表示が乱れてし 
まうのである。100行を削って走らせてみるとよ〈わかるであろ 
ラ。 

リスト3は，桁指定に「*」を使ってみた例である。 

リスト4は，4桁の16進数で左側を0で埋めるようにしたもの 
である。 BASIC では， 

PRINT RIGHT $( ”000，， + HEX $(1),4) 

としてやっていたもの力す， C ではこれですんでしまう。普通 C で 
は，数字の左側に Ox がつくと16進数で，0だけがつくと8進数と 
いうことになっているが（つまり0父=&11，0だけだと&〇だ）こ 
の例における「04」は，8進数ではなく，「幅4桁でスペースの代 
わりに “0” を詰める」という指定なのである。 

これ以上は，説明するよりも，実際にやってみてもらったほう 
がよいであろう。なお，引数の数や順序を間違えたり，実数を％ 
d の指定で表示させようなどとすると，たちまち奇怪な現象に出 
くわすはずである。パ、 スエラー などが起きたとしても， BASIC は 
壊れてはいないはずなので，そんなに心配せずに エラーし ていた 
だきたい。 

最後にエスケープ文字列というやつを説明しておく。これはコ 
ント ロールコードな どを，目で見えるようにするための方便であ 
る。 BASIC でなら， A $ + CHR $ (& H 0 D ) などという表現方法が 
あるが， C では文字列の足し算などはないので，こうなっている 
のであろう。実際 BASIC にも欲しいぐらいの機能である。で ，X 
C では，表3がサポートされている。カッコの中は 文字コードで 
ある。この中で，16進数でアスキーコードを指定できるのに，10 
進数ではできないというのは実に奇怪である。 ¥ dnnn なんてのは 
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X_INZ 

X^RUN 

X_END 

X_SYSTEM 

X_BRK 

X_CTRL_D 

x_reta5rs 

X_RETADRS 
PTR^TOKBN 
PTR^PARAM 
PTR_EXEC 
0 v 0 f 0 t 0 r 0 


PTR_TOKEN 

DC 

DC 


FUNCTION NAME TABLE• 


B 


f printf*,0 
0 


^printf<Btr,aryl,aryl f 


»aryl) 


.EVEN 

拿 .FUNCTION PARAMETERS TABLE 

PTR_PARAM 

DC.L COM^PARAM 


atr^val 
any_aryl_omt 
int ret 


equ 

equ 

equ 


)0008 

$00bf 

$8001 


* 省略可能な 1 次元配列へのポインタ 


atr^val > FORMAT 

any 一 ary Lomt , any—ary1_omt 
any_ary1—omt,any_aryl_omt 
any_aryl_omt,any_ary1—omt 
any—ary し omt,any—ary1—omt 
any aryl__orat 
int_ret 


FUNCTION ADDRESS TABLE 


DC.L 

X^INZ ： 

X_RUN: 

X_END: 

X.SYSTEM ： 

XJBRK: 

X_CTRL_D: 

X.RETADRS 

RTS 


b_cprintf 


.TEXT 

b_oprintf 


DO_STR 


MOVE.L 

SP,OLD SP 

♦SAVE STACK 

MOVEQ.L 

#10_1-1 ， D7 


LEA 

96(SP) ， A1 

拿 A1=TYPE OP LAST PARAM 

TST.W 

Ul) 

拿 CHECK TYPE 

BPL 

LOOP2 

拿 $FFFF == OMIT PARAMETER ? 

LEA 

-10(A1),A1 

拿 A1=A1 - 10 

DBR\ 

D7,LOOPl 


MOVE.W 

(A1),D0 

tQET TYPE 

EXT.L 

D0 

拿 SIGN EXTEND 

BMI 

ERROR 

tlF D6== 拿 FFFF THEN ERROR 

BEQ 

DO FLOW 

拿 IF D6 = = 0 THEN FLOAT 

SUBQ.L 

#2,D0 


BMI 

DO INT 


BEQ 

DO_CHR 


MOVE•L 

6(A1),A2 


PEA 

10(A2) 

♦PUSH POINTER 

LEA 

-10(Al) f Al 

<A1-=10 

DBRA 

D7 f LOOP2 


BRA 

DO_IT 


MOVE.L 

6(A1),A2 


MOVE.B 

10(A2),D0 

♦GET VAL 


拿 SIGN EXTEND 


CR EQU $0D 

LF EQU $0A 



10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 
21 
22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 

59 

60 
61 
62 

63 

64 

65 

66 

67 

68 

69 

70 

71 

72 

73 

74 

75 

76 

n 

78 

79 

80 
81 
82 

83 

84 

85 

86 

87 

88 

89 

90 

91 

92 

93 

94 

95 

96 

97 


おいしいてはないか。 

今月のプログラムの書式指定文字列の中では，これらすべては 
サポートしていないが， K & R に載っている 「¥ n 」，「¥ t 」，「¥’ j ， 
「¥”」，「¥¥」， r ¥ nnnj はサポートしてある。 ¥ nnn があるんだ 
から，基本的には困ることはないであろう。なお， 書式指定でな 
い文字列中では，これらのエスケープ文字はサポートされていな 
い。すなわち， ‘¥ n ’ はモロに’ ¥ n ’ のままである。 

printf.s 


2 

3 

4 

5 

6 

7 

8 
9 


X-BASIC EXT_FimCTION 
printf() 

Programmed by Ippei Iwax 

O h ! X 88’7 月号 揭載 
««俱楽部 88’ 7 月号掲載 


最後の最後に言っておく力す，ど一ゆ一わけだか， C では復帰改 
行が $0 a なのである。しかし， printf に $0 a を与えても改行はして 
くれるが復帰をしてくれない。それで，プログラムでは ¥ n を $0 a 
ではなく $0 d 0 a に変換している（リスト5の164行〜)。これはなか 
なか奇怪なことで’ある。ヒマな人は調べていただきたいものであ 
る。 

今月はまあまあのい一かげんさであった。ではまた米月。 


98 


EXT.L 

D0 



99 

拿 





100 


MOVE•L 

D0,-(SP) 

♦PUSH VAL 


101 


LEA 

-10(A1),A1 

拿 Al-=10 


102 


DBRA 

D7 f LOOP2 



103 


BRA 

DO_IT 



104 

DO^INT 





105 


MOVE.L 

6(A1) ， A2 



106 


MOVE.L 

10(A2) f -<SP) 

拿 PUSH VAL 


107 


LEA 

-10(A1),A1 

♦Al-=10 


108 


DBRA 

D7,LOOP2 



109 


BRA 

DO_IT 



110 

DO_FLOW 





111 


MOVE.L 

6(A1) ， A2 



112 


MOVEM^L 

10(A2),D0/D1 

♦GET VAL 


113 


MOVEM.L 

D0/D1,-(SP) 

♦PUSH VAL 


114 


LEA 

-10(A1),A1 

*A1-=10 


115 


DBRA 

D7 f LOOP2 



116 

t 





117 

DO 一 IT 





118 


MOVE-L 

6(A1),A1 

*A1 POINTS FORMAT 

119 


LEA 

FSTR,A2 

本 ARRANGE FORMAT 


120 


MOVEQ.L 

# ， ¥ ， ， D6 



121 

FCONVL 





122 


MOVE.B 

(A1 い , D0 



123 


CMP.B 

D6 t D0 

♦ ? 


124 


BEQ 

SLASH 

♦THEN BRANCH 


125 


MOVE.B 

D0 f (A2 い 

本 GET NEXT CHAR 


126 


BNE 

FCONVL 

拿 NOT NULL THEN LOOP 

127 


BRA 

GO.PRINTF 

本 DO CPRINTF 


128 

拿 





129 

SLASH 

MOVE.B 

(A1)+,D0 
# ， n ，， D0 

♦GET NEXT CHAR 


130 


CMP.B 

拿 •¥n , ? 


131 


BEQ 

DO N 



132 


MOVEQ-L 

#$09 t Dl 

*，¥い ？ 


133 


CMP.B 

# ， t ，， D0 



134 


BEQ 

SEND 



135 


CMP.B 

# ， 7, ， D0 

拿 ， YddcP ? 


136 


BGT 

SEND0 



137 


CMP.B 

# ， 0 ，， D0 



138 


BLT 

SEND0 



139 

拿 OCTAL NUMBER 




140 


MOVEQ.L 

#0,D1 
#3-1,D2 



141 


MOVEQ.L 

♦COUNTER (MAX 3 

KETA) 

142 

t 





143 

OCTLOOP 





144 


SUB.B 

， D0 



145 


ASL.B 

#3 f Dl 



146 


ADD.B 

D0 f Dl 



147 

148 


MOVE.B 
CMP.B 

(Al)-f ,D0 
# ， 7, ， D0 



149 


BGT 

OCTEND 

♦NOT OCTAL THEN 

END 

150 


CMP.B 

# ， 0 ，， D0 



151 


BLT 

OCTEND 

拿 NOT OCTAL THEN 

END 

152 


DBRA 

D2,OCTLOOP 

拿 CHECK KETA 


153 

OCTEND 





154 


MOVE•B 

Dl,(A2)+ 



155 


SUBQ.L 

#1,A1 

拿 AUA1-1 


156 


BRA 

FCONVL 



157 






158 

SEND0 

MOVE.B 

D0 # (A2) + 



159 


BRA 

FCONVL 



160 






161 

SEND 

MOVE.B 

D1•(A2) + 



162 


BRA 

FCONVL 



163 






164 

DO_N 

MOVE ， B 

#CR t (A2>+ 



165 


MOVE.B 

#LF f (A2) + 



166 


BRA 

FCONVL 



167 






168 

GO^PRINTF 




169 


PEA 

FSTR 



170 


JSR 

cprintf 



171 


MOVE.L 

OLD SP,SP 

拿 BACK SP 


172 


MOVE.L 

D0 f INT^DATA 

♦RETURN VALUE 


173 


LEA 

RET DATA,A0 



174 


CLR.L 

D0 

拿 NO ERROR 


175 


RTS 




176 

t 





177 

ERROR 





178 


MOVE.L 

OLD SP,SP 

零 BACK SP 


179 


MOVEQ.L 

#1,50 



180 


LEA 

MES0 V A1 



181 


RTS 




182 

拿 





183 

OLD_SP 

DS.L 

1 



184 

拿 





185 

RET_DATA 




186 


DS.W 

1 



187 


DS.L 

1 



188 

INT^DAT) 

\ 




189 


DS.L 

1 



190 






191 

MES0 ： 

DC.B 

•パラメータの並びに抜けている部分があ 

192 

拿 





193 

FSTR 

DS.B 

256 



194 

拿 






.. 

TCCCCCCCCCCCC 

•DDDDDDDDDDDD 


102 Oh ! X 1988.7. 

















printf.fnc 


0600 

0608 

0610 

0618 

0620 

0628 

0630 

0638 

0640 

0648 

0650 
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0660 

0668 

0670 

0678 


SUM ： 

0680 

0688 

0690 
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06A0 
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06C0 
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06D0 
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SUM ： 

0700 
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SUM: 

0280 

0288 

0290 

0298 

02AO 

02A8 

02B0 

02B8 

02C0 

02C8 

02D0 

02D8 

02EO 

02E8 

02F0 

02F8 


SUM ： 

0300 

0308 

0310 

0318 

0320 

0328 

0330 

0338 

0340 

0348 

0350 

0358 

0360 

0368 

0370 

0378 


SUM: 

0380 

0388 

0390 

0398 

03A0 

03A8 

03B0 

03B8 

03C0 

03C8 

03D0 

03D8 

03E0 

03E8 

03F0 

03F8 


SUM ： 

0400 

0408 

0410 

0418 

0420 

0428 

0430 

0438 

0440 

0448 

0450 

0458 

0460 

0468 

0470 

0478 


SUM ： 

0480 

0488 

0490 

0498 

04A0 

04A8 

04B0 

04B8 

0400 

0408 

04D0 


0000 

0008 

0010 

0018 

0020 

0028 

0030 

0038 

0040 

0048 

0050 

0058 

0060 

0068 

0070 

0078 


SUM ： 

0080 

0088 

0090 

0098 

00A0 

00A8 

00B0 

00B8 

00C0 

00C8 

00D0 

00D8 

O0E0 

00E8 

00F0 

00F8 


SUM ： 

0100 

0108 

0110 

0118 

0120 

0128 

0130 

0138 

0140 

0148 

0150 

0158 

0160 

0168 

0170 

0178 


SUM ： 

0180 
0188 
0190 
0198 
01A0 
01A8 
01 BO 
01B8 
0100 
01C8 
01D0 
01D8 
01E0 
01E8 
O1F0 
01F8 


B225 

39 

CD 

79 

09 

C3 

AF 

2C 

50 

00 

FF 

OF 

39 

06 

B6 

01 

00 


04D8 00 

04E0 01 

04E8 00 

04F0 02 

04F8 08 


06 34 03 
12 61 00 
01 0C 10 
20 08 04 
04 00 16 


48 43 61 
0154 41 
00 2D 67 
00 IE 66 
67 00 02 


00 

29 

EB 

F5 

00 

B1 

10 

C2 

12 

9D 


0278 00 00 00 00 00 00 00 00 : 00 


SUM ： 

41 

D4 

A3 

DF 

A 4 

82 

47 

76 2611 

0200 

00 

00 

00 

00 

00 

00 

00 

00 

00 

0208 

00 

00 

00 

00 

00 

00 

00 

00 

00 

0210 

00 

00 

00 

00 

00 

00 

00 

00 

00 

0218 

00 

00 

00 

00 

00 

00 

00 

00 

00 

0220 

00 

00 

00 

00 

00 

00 

00 

00 

00 

0228 

00 

00 

00 

00 

00 

00 

00 

00 

00 

0230 

00 

00 

00 

00 

00 

00 

00 

00 

00 

0238 

00 

00 

00 

00 

00 

00 

00 

00 

00 

0240 

00 

00 

00 

00 

00 

00 

00 

00 

00 

0248 

00 

00 

00 

00 

00 

00 

00 

00 

00 

0250 

00 

00 

00 

00 

00 

00 

00 

00 

00 

0258 

00 

00 

00 

00 

00 

00 

00 

00 

00 

0260 

00 

00 

00 

00 

00 

00 

00 

00 

00 

0268 

00 

00 

00 

00 

00 

00 

00 

00 

00 

0270 

00 

00 

00 

00 

00 

00 

00 

00 

00 


6883433 E 


• 0 14 4 D 4 0 C 


0F 2120645 1D41CC5 
0D8080A 048264337 

0C22A1 080300222 E 
c 487460005004 DD4 

78C21D05CBCC1A11 
EB 000206323 FC041 

8906001000022082 

4006006010181044 


F 0 
2 0 


>E0EFC3030C3FC 
0 A 2 0 2 


4 0 4 1 


2 0 7 
116 


16 10 8 


2 2 


B0F 210006067820 F 
00FB 660661660422 

0FC07CF471E069F9 
007408 E 010230880 

0C2800F1 0000 6 2 IF 
04b 4004600006552 

9413 F0144BCCE224 
B180D08C0E 332040 

E030C1 2081000720 
4052465004 BB0650 


一 E 40113021 t 


F 0 B c o 


9 9 0 
7 F o 


o 8 c B E A o o 


40230 E 3003242200 
*100202400889 8 800 


0^ 08011E0EO 3 322220 
A 0400447408888880 

)8c 29080 FC0OB14ACO 
D fab 08878005 dcado 


)E CA 7902 OW0O1OF48O 
D AOB 70800008 CA9EO 

P O01EO1OOOO3 52520 
F 6 002000000898980 


7 9CCC9C4668E 0815 F 
5 DD0B10AF9F83ED8C 


003F0E00^ 


7 004C6F8940F3C7F2 
A 0007040 B10F43EE0 


>B 022406 F 43442 


>E 4700440 


>E0093F080 


^4040063F352 


0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 00 

0 0 0 0 0 0 0 0 0 0 0 o 0 
0 0000000000000000 

0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 F 
0 0000000000000002 

0 000000000000000 F 
0 0000000000000002 

0 0 0 0 o o o 0 o 0 0 o 8 
0 0000000000000000 


00000000000000 

00000000000000 


0 0 
0 0 


0 

o 

0 

0 


>00000000000004 


• 028c 0321 


4F4FFFF597C0464D 
DE01E 628101100 C2 


0202F 22282 E0016C 
0024100400400660 

90527 FF7ZF8404C5 
7070E 6681 EFC 0017 

80EF8C 82 1F88C00E 
404F 4224 6 4700614 

79005408 F2F6C859 
AB1079A94FD 04071 


1 1F807E2A9FAA87E7 
0 A6886B 810301 FB17 

5 

F .. . . 

EC2DC 01003092120 

c 08008 c 0670250006 

6 6006000660600103 

c F6066F4ACC900D03 
8 10010 Fc 213300104 

4 06c 06680000 BC0C8 
F 06006700 IB 060004 

E 4BE 4366018 C404CD 

8 C2DC2C 0001384 C71 

D 8008006 c 60058852 
6 0060066036 B 04002 

9 60E 60702 D6200C00 
B 0010013 11A1 00301 


-006000620663666 


B 388514 DCFD41D8E 
81FC538EF5F0ED57 


B 

c 

5518 _ 

00100 D00 

F 000200 C00B 000000 
1 0315401001000000 

1 70258 C0CC0CCCCCC 
B 6060400000000000 

6 cc 903644 C404C406 

2 133040 C32C11008A 


-60000200000 


3 EB 3617 E 298 c 
c D659D 497460 


9 80000222 F3C 
6 60000800 F43 

F 077772 CCF86 
F 06666400 F 43 

9 0F3582D6C14 
0 06777 C1970O 

2 c 0000420606 
8 00000020 B06 

c 200000 D0CCF 
1 0000001043 F 


00000626 63^ 

1 04AC4A0764C 
B 026AE 506607 

D 55322340066 

1 6600001006b 


D70C0000CCCC8200 
9A 080000 CCCC8600 


0A 060000 6 66 68000 
0904000066664000 

0D 00000000000000 
0000000000000000 

0000000000000000 

0000000000000000 

0000000000000000 

0000000000000000 

0006000066660200 

0004000066664600 

0000000000000000 

0000000000000000 

5000000000000000 

5000000000000000 

8000000000000000 

4000000000000000 


F 33CCC7F6CEF2D9A4 
7 91FFAF 9398426007 


0 0FFF 588682 A2A0AA 
c 0BBB700FE10E20.C2 

D 0000EEAF070F0FFF 
0 0 o 0 0 4 7 6 F 0 6 0 F 12 K 2 

0 68FF8E1F0CAF60F6 
0 60BB675C026C0CC0 

0 400001 A1BB 810810 
0 7000004566450450 

0 ECFF 000600 6 69069 
8 6 4BB006FC80F68F6 

0 9000000 F850F48F4 
0 6000000 F450F24F2 

5 20FF1FF 912990 A98 
5 70BB0CEE146E40E2 


6 B021E 93526 FAE53D 
9 4C706B 53851510 Be 


c F67F996E4A 017491 
B C 0 ECF 1 F 67200308 c 


2 69A66C0CC740C010 
F F60F05C 3332333 CB 

8 F40F0C4000D 00040 

1 F20F071BB060B016 

2 963997699 C0C9C80 
1 E10E6B 01033313 EC 

3 30032170200000 F4 

9 460420617 B091BF1 

8 A8A 0006204 C20AA4 

9 0BE0A 005433000 CB 


F 6C1EEDF6667A4CE0 
9 4E9A7B414C1794F1 


2 c 09504 ECE 414 A 2 CF 
D F1C7F 0200310110 D 

^ 7 ] 2 8 F B 
>664066 

420107 cl 0080000 A 
01C141F440F4440F 

7B 22802 3 3268 A32F 
661440155264452 F 

:06134E09 
-3F 40020 c 

6 AA11 08770 F 306001 
5 446620 6 60 F 526045 

E 1D1A100 0C9057C70 
8 028F8344FCC71FEC 

4 1 2 E 0 2 8 2 

•45140141 


c 9 A 2 9 c c 8 

8 516 F0B6 

A . 

2 6 59ECF3 
F 07093 F4 

4 6 E A 16 F 8 

9 6 4 2 o 3 F 4 

D 88c 04 cl 
6 18 F 0 0 7 0 

4 0360660 
B 1 5 6 6 6 B 0 

9 5 0 9 5 F 3 c 

5 7318 F 43 

5 E o A 3 F 8 6 
B 4 0 4 5 F 4 3 

E 2 c 8 8 c 14 

8 0 3 4 8 7 0 0 

9 0 0 2 A 6 0 .b 
5 0 12 9 B 0 6 


03D2C62A68BC2E65 
E 8515 C5EDAFA9AAA 


W79DC1AC0C91 


c 調言語講座 PRO-68K 103 
































0880 

0888 

0890 

0898 

08A0 

08A8 

08B0 

08B8 

08C0 

08C8 

08D0 

08D8 

08E0 

08E8 

08F0 

08F8 
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0808 

0810 

0818 

0820 

0828 

0830 

0838 

0840 

0848 
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0C90 

0098 

0CA0 

0CA8 

0CB0 

0CB8 

0CC0 

0CC8 

0CD0 

0CD8 

0CE0 

0CE8 

0CF0 

0CF8 


SUM ： 00 00 

0B00 00 00 

0B08 00 00 

0B10 00 00 

0B18 00 00 

0B20 00 00 

0B28 00 00 

0B30 00 00 

0B38 00 00 

0B40 00 00 

0G48 00 00 

0B50 06 07 

0B58 0B 2E 
0B60 0135 

0B68 24 81 

0B70 00 00 

0B78 00 00 
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SUM ： 31 C0 08 FE B4 FB D4 41 


SUM ： 00 8E 

0E00 00 06 

0E08 00 06 

0E10 0144 

0E18 00 4A 

0E20 02 01 

0G28 70 72 

0E30 02 01 

0E38 75 74 

0E40 00 00 

0E48 74 6F 

0E50 00 00 

0E58 74 00 

0E60 5F 66 
0E68 00 00 

0E70 00 00 

0E78 00 00 


0000 


00 
00 
00 
00 
00 
00 
00 
00 
00 
0 0 
00 
08 
10 
10 
C0 
78- 
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09D0 
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09F8 


0738 
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0768 

0770 
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07.90 
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07B0 
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騮 0 c 入門 


第 12回 


無限作曲 • MML 伝説(ミュージック応用編） 

Nakamori Akira 

中森章 

先月お届けしたミュージック基礎攻略編に続いて，今回はその応用 
編としてサンプルプログラムをバシバシ用意し，そこからさらにそ 
れらの集大成として自動作曲プログラムへと侵攻していきます。こ 
こまで制覇すれば，も5あなたはきっと立派な作曲家 (7) です0 


先月に引き続いて今月も FM 音源を扱っ それぞれの要素の詳しい説明は先月してあ といっても過言ではありません。音にこだ 

てみたいと思います。先月は MML の解説 りますのでここでは省略します。それより，わる人が自分で音色を設定しなければ気が 


をメインとしたいわば基礎編でした。です 
から，なにかマニュアルを読んでいるみた 
いで，思わず眠気に襲われた人もいるので 
はないでしょうか。今月は眠気を吹き飛ば 
すためにプログラムをどんどん作って，ア 
クテイブにやりたいと思います。しかし， 

もしかしてどこかに細かいミスがあるやも 
しれません。しかしそれは，ここまで育っ 
てきたこの私の音楽センスの末路だと思っ 
て，「実際に音が鳴る」という点を考慮しな 
がら，プログラムの構造を追うことを優先 
させて〈ださいね（うう，音楽は苦手じや)。 


音色を変える 


パソコン 雑誌に掲載され ているいろいろ 
な音楽プログラムを見ると，音色としてプ 
リセット音をそのまま使わず，新たに設定 
し直して いる 例がかなりあります。やはり， 
音楽に凝っている人は音色にも凝るものな 
のでしよう。そういえば，清水和人さんも 
「音色を語らずして音楽に未来はない」なん 
ていってましたっけ （3 月号参照)。という 
わけで，まずは音色を変えて音楽演奏をし 
てみましよう。 

1) 音色を変更する関数 

X - BASIC で音色を変更する （ というか追 
加する）関数は m _ vset です。この関数は引 
数として， OPM にセツトすべき音色の情報 
を持ちます。先月で解説したとおり ， OPM 
は4 つのオペレータ （サイン波発生器）を 
組み合わせていろいろな波形を作り，それ 
にエンベロープの情報や LFO (低周波発振 
器）の情報が合わさって，ひとつの音色を 
作ります。 m _ vset 関数ではこれらの情報を 
ひとつの5 xil の2次元配列に入れて，そ 
の配列の名前を弓 I 数とします。配列の内容 
は図 I のようになっています。 

また，図1を OPM に対する機能という 
観点から見たものが図2，図1を OPM の 
資源という観点から見たものが図3です。 


OPM の内部レジスタの表が手元にあれば 
(たとえば単行本『試験に出る XI 』など），そ 
れを見てみましよう。 m _ vset 関数の引数に 
与える配列の内容が， OPM のほとんどすべ 
ての内部レジスタに対応していることがわ 
かります0あとに残っているレジスタはノ 
イズ関係のレジスタ（あまり使われない） 
と，音階（ドレミ…… ） をす旨定するレジス 
夕（これは MML の音符の記述によって設 
定される）ぐらいですから，音色の設定に 
よって FM 音源のすべてが決まってしまう 


済まないという気持ちもうなずけますね。 

さて， m _ vset 関数では音色の情報が人つ 
た配列の名前のほかに，それを何番目の音 
色にするかという値を引数とします。音色 
の番号は1から68まではプリセット音とし 
てあらかじめ設定されていますから，通常 
は69〜200を指定します（もちろん，1〜68 
の音色を設定し直しても構いません)。それ 
では， m _ vset 関数のフォーマットを以下に 
示します。 

m_vset ( vo , va ) 


X - BASIC の基礎事項(前回まで) 


X-BASIC では，変数を使用する前に変数の型 
宣言をしなければなりません。宣言できるデー 
夕型は int (4 バイト整数）， char ( Iバイト整 
数)， str (文字列), float (実数)の4種類です。 

X-BASIC のプログラムの実行はその大部分が 
関数の呼び出しによって行われます。それ以外 
は制御構造です。型宣言と制御構造と関数，こ 
れが X-BASIC の3大要素です。 

X-BASIC には画面上のキャラクタをスムーズ 
に移動させるためのスプライト機能が備わって 
います。これにより最大128個のキャラクタを 
同時に移動させることができます。この移動の 
とき，パターンの反転，色の変更なども可能で 
す。また，バックグラウンドと呼ばれる画面が 
2面あり，ここでは最大 64X64 個並べたキャラ 
クタを背景として利用できます。ノ<ックグラウ 
ンド面上では，画面上のすべてのキャラクタが 
同時に移動します。 

また， X-BASIC では65536色同時発色を特徴と 
する X68000 のグラフィック機能を扱うことがで 
きます。色数が65536色であるのはグラフィッ 
ク画面（実画面）が 512X512 ドットの場合です 
が，色数を256色，16色と減らすことによって， 
実画面を2画面，4画面と増やすことができま 
す。さらに，色数を16色，実画面数をI画面に 
限れば I024X 1024ドットという大画面を扱うこ 
ともできます。また，複数個の実画面は高速に 
切り換えることができますし，それぞれをスク 
ロールさせる こともできます。 この 機能をうま 
く使えば，アニメー シヨンも 簡単です。 

また，グラフィック画面の特徴として半透明 
機能があります。これは，グラフィックの実画 
面同士あるいはグラフィック画面とテキスト画 
面（スプライト画面）を重ね合わせて表示する 


機能です。この重ね合わせは，最も優先順位の 
高いグラフィック画面が半透明になることで実 
現されます。しかし，残念ながら半透明機能は 
X-BASIC から直接扱うことができません。メモ 
リ上にマッピングされている X68000 のビデオコ 
ントローラの内部レジスタを直接書き換えるこ 
とで扱うことができます。 

X68000 ではグラフィック画面のみならず，テ 
キスト画面もビットマップ方式を採用していま 
す。さらに，テキスト画面は16色のパレットや 
スクロール 機能も備わっています。このため， 
テキスト画面もグラフィック画面と対等に扱う 
ことができます。たとえば，グラフィック画面 
の退避領域としてテキスト画面を使用すること 
ができます。 

また， X68000 にはマウスが標準で付いてきま 
す。そして， X-BASIC ではこのマウスを扱うた 
めの関数が用意されています。マウスを入力装 
置とすることで操作性のよいプログラムを 書く 
ことができます。 

X68000 のハードウェアでスプライト，グラフ 
ィックと並ぶ3大特徴のひとつが FM 音源用です。 

X68000 は， FM 音源用の LSI として OPM (YM2I 
51) を内蔵し，8 オクターブ， 8重和音のステ 
レオ 演奏を行うことができます。そして， X-BA 
SIC には 0PM に音楽を演奏させるためのインタフ 
ェイスとして MML (ミユージ ック•マクロ •ラ 
ンゲージ）と呼ばれる言語が用意されています。 
この MML は演奏の繰リ返し指定を簡単に記述で 
きるという特長があります。また，音楽の演奏 
は割り込みによってほかのプログラムの実行と 
同時に行われるため，この FM 音源をゲームブロ 
グラムなどの BGM として利用することも可能で 
しよ つ。 
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引数 VO 音色番号 (1 〜 200) 
va 2次元配列の名前 
dim char va (4，10) 

で宣言されるもの 

2) 音色の取り出し 

音色が設定できるからには，すでに設定 
されている音色の情報を取り出すための関 
数がなければ片手落ちです。 X-BASIC で 
は音色情報を取り出すための m _ vget 関数 
が用意されています。この m _ vget 関数は， 
m _ vset 関数と同形式の char 型2次元配列 
(の名前）を引数とし，もうひとつの引数で 
ある皆色番号で指定される皆色の情報を取 
り出して，配列に格納します。この関数は 
プリセット音などを取り出して，少しだけ 
変更する場合に便利です。 m _ vget 関数のフ 
オーマットを以下に示します。 
m_vget ( vo , va ) 

引数 vo 音色番号 (1 〜 200) 
va 2次元配列の名前 
dim char va (4，10) 

で宣言されるもの 

それでは，ここで m _ V get 関数を使ったプ 
ログラムを作ってみましよう。音色の情報 
は m . vget 関数によって配列のなかに簡単 
に取り込むことができますが，それを変更 
するとなると配列の内容を調べる手間が必 
要です。このとき，配列の内容（音色の情 
報）が， 

10000 dim char va (4,10) = | 

10010 …，…，…， . 

10020 …，…，…， . 

10030 …，…，…， . 

10040 …，…，…， . 

10050 …，…，…， . | 

といったプログラムの形（つまり，行番号 
のあとに音色情報の記述がくる形）で出力 
されると，配列の内容は一目瞭然で音色の 
変更も楽になります。これなら，必要な要 
素を変更したあと，カーソルを出力の最初 
の行に持っていき， リターンキーを バシバ 
シと押していくことでその設定をプログラ 
ム内に取り込むことができます。このプロ 
グラムがリスト1です。リスト1のプログ 
ラムを実行すると音色の番号を聞いてきま 
すから，好きな番号を入力するとその番号 
の音色がプログラムの形でデイスプレイ上 
にプリントされます（図4>。 

3) 音色を変更する演奏例 

音色を変更する理由はプリセット音の音 
色が気に入らないからにほかなりません。 
FM 音源は万能ではなく，所詮は自然の楽 
器の音色を電気の力で真似ているものです 
から，本物とまったく同じ音色を作り出す 
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図1音色情報その1 
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図3音色情報その3 
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図4 リスト1の実行結果 


10000 /* 音色 （ 1 > 

10010 dim char va( 4,10 ) = { 
10020 /* 

10030 /* 

10040 
10050 /* 

10060 /* 
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/* OP 1 
/* OP 2 
/* OP 3 
/* OP 4 


31, 

20 ， 

8, 

31, 

10, 

5, 

31, 

20, 

8, 

25, 

10, 

5, 


/* 

mvset(72,va2) 


dim char va3 (4,10)=( 

/* 

/* F/A MSK WF SYC SPD PMD AMD PMS AMS PAN 


58,15, 2 ， 0 ， 205, 0, 0, 0 ， 0, 3, 0, 

ハ 

/* AR DIR D2R RR D1L TL KS MUL DTI DT2 AMS 


19, 2,1, 4, 3, 33, 3, 5, 7 , 0, 0 ， / 本 OP 1 

19, 2 ， 1, 4, 3, 25, 3, 5 ， 2, 0, 0, /* OP 2 


m_vset(71,va1) 

ハ 

dim char va2 (4,10)=( 

/* 

/本 F/A MSK WF SYC SPD PMD AMD PMS AMS FAN 


28, 15, 2, 0,180, 0, 1 ， 0, 1 ， 3 ， 0, 

/* 

/* AR DIR D2R RR D1L TL KS MUL DTI DT2 AMS 


リスト 2 ピアノの音色の聞き比べ 


逆«び）シヤアより 


v G u n cl a m 


/* 


A . ピアノ ブリセット 

dim char vaO(4,10)={ 

/* 

/* F/A MSK WK SYC ： SPD HMD AMD FMS AMS PAN 
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OF 
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1 I 
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OP 
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mvset(70,vaO) 

/* 

/* 

/* A •ヒア ノ VIP 
/* 

dim char vail 4,1 0} = { 

/* 

/* F/A MSK WF SYC SPD PMD AMD PMS AMS PAN 
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U スト 1 音色の表示 

10 /* 

20 /* 音色の表示 
30 ハ 

40 int i , j , lin= 10000 : char v 
50 dim char va(4,10) 

60 input ” 音色の番号 "； v : els 
70 /% 

80 m_vget(v,va) /* 音色 データを 取り出す 

90 /* 

100 lpr( ) : print "/* 音色 （"； v; 

110 lpr( ) : print "dim char va(4,10 ) = {" 

120 /* 

1 30 for i=0 to 4 


140 

if i = 0 

then { 








150 

lpr( 

) : print ’ •/* 

F/A MSK 

WF 

SYC 

SPD 

PMD 

AMD 

PMS AMS PAN" 

160 

lpr ( 

) : print ••/*- 








170 

)else 

if i=l then { 








180 

lpr ( 

) : print ••/ 本 

AR DIR 

D2R 

RR 

D1L 

TL 

KS 

MUL DTI DT2 AMS 

190 

lpr ( 

) : print •• ハ - 








200 

} 









210 

lpr() : 
for j=0 

print ° ，，； 








220 

to10 








230 

print using 

va(i,j) 

J 






240 

if (i<>4 )or(j<>10) 

then print 


else print 

"r; 

250 

next 









260 

if i<>0 

then print •• 

/ 本 0P";i 

else print 




270 

next 










280 end 
290 /* 

300 ハ 行番号のブリント 
310 ハ 

320 func lpr() 

330 print using "##### " ； lin; : lin=lin+10 
340 endfunc 


のは不可能です。そこで，いろいろな入が 
「あ一でもない」，「こ一でもない」といって 
音色作りに精を出すわけです。しかしハッ 
キリいって，音色を作ることは昨日今日の 
勉強でできるものではありません。音色に 
対してあまり慣れていない人の場合は，ほ 
かの人たちが作った音色を聞き比べてみて， 
そのなかからピッタリとくるものを探すし 
かなさそうですね。 

実際，「ピアノ （ A •ピアノ〉」の音色ひと 
つをとってみても，パソコンの機種別，音 
楽ソフト別に多くの種類があるようです（全 
部が異なる音色情報を持つ）。ここでは， 
Oh!X 3月号の67ページで紹介された XI 用 
VIP の「 A •ピアノ」の3種類（もある）の 
音色と， X-BASIC のプリセット音の 「 A . 
ピアノ」の音色（音色番号 1) を聞き比べ 
てみることにしましよう。比べて聞くと， 
それぞれ違う音色であっても，どれもそれ 
なりに本物に聞こえるものですね。このた 
めのプログラムがリスト2です。 

リスト2では X-BASIC のプリセット音 
(リスト1のプログラムで取り出した〉を音 
色番号70として再設定し， VIP による音色 
を音色番号71〜73で設定してあります。そ 
して，音色番号を70から73まで変化させな 
がら同じ曲を演奏させています。プログラ 
ム自身は for 〜 next ループのなかに MM しを 
書き並べてあるだけですので説明は不要で 
しよう。なぉ，この曲は，映画「機動戦士 
ガンダム逆襲のシャア」の音楽より「メ 
インタイトル•レガン^ T ' ム」と呼ばれてい 
る曲の一部です。 これでも，同じ「ピアノ」 
の音なのかなと思うくらい感じが違うのが 
わかります。そこで，結論。音色は演奏の 
感じを決定する大事な要素であるというこ 
とです。 


音楽の3要素を体験する 


さて，音色にこだわることも大切なので 
すが，音を鳴らすだけでは音楽になりませ 
ん。せっかく， MML を扱うからにはもっ 
と音楽をやったという気分になれなくては 
面白〈ありませんね。これからしばらくは， 
MML を使って音楽の気分に浸ってみまし 
よう。音楽の3要素といえば，リズム，メ 
ロディ，ハーモニーです。 以下では， この 
音楽の3要素のそれぞれを MML で 実践し 
ます。 

1) リズム 

リズムとは，本来は「メロディの秩序だ 
った動き」， 「ハーモニーの 秩序だった動き j 
を表す言葉なのだそうです。しかし，ここ 


>10 1 


0 0 0 0 


3 4 4 3 


113 1 


0 0 0 3 


0 0 0 0 


p p p P 
0 0 0 0 

本本本本 

/ / / / 




0 0 01 


0 0 0 0 


6 2 41 


本本本 

/ / / 
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では単純に音楽を演奏するうえでの拍子の 
取り方と思って〈ださい。要するに 「タン. 
タツ•夕」，「タン•夕•タン」，「タン•夕 
•夕•タン」 とかいう，一定の パターンを 
持ったビートのことです。「ワルツ」だとか 
「タンゴ _!， 「サンバ」といった言葉を聞いた 
ことがあるでしよう。それらは皆，ある特 
定の パターンを 持ったリズムのことなので 
す。図5に代表的なリズム パターンを 示し 
ます。それでは，図5に示されたリズムパ 
ターンを MML で演奏させてみましよう。 
そのためのプログラムがリスト3です。こ 
のプログラムも単純ですから説明は不要で 
しよラ。 

なお，このプログラムでは，演奏する音 
符の列がまったく同じため，4ビート （4 
拍子）のリズムは2ビート （ 2拍子）のリ 
ズムと同じもの，6ビート （6 拍子）のリ 
ズムは3ビート （ 3拍子）のリズムと同じ 
ものとして省略してあります。しかし，本 
当は強柏とか弱拍とかいった区別をしなけ 
ればならないところです。たとえば， 

2拍子—強一弱 
3拍子—強一弱一弱 
4拍子一> 強一弱一中強一弱 
6拍子—強一弱一弱一中強一弱一弱 
などといった強弱をつける必要があります 
(こんなの小学校で習った記憶があるなあ）。 
具体的には音量（ V コマンド）を変えて強 
弱をつければよいので，暇な人はリスト3 
を書き換えてみてください。 

2 ) ハーモニー 

ハーモニーとは，メロデイを包み込んで 
曲に調和感を与えるコード（和音）のつな 
がりのことです。要するに，いくつかの音 
(基本的には3つ〉を同時に鳴らすことです。 
楽譜のなかに C とか Am とか Bdim とか書 
かれているのをよく見かけます 力す， それが 
コードの指定です。 C とか A とか B という 
名前はコードを形成するいち ばん 低い音の 
名前で， m とか dim というのは3つの音の 
音程の関係を示します。 m とか dim の意味 
は次のとおりです0なお，「全 j ， 「半」は， 
それぞれ，全音，半音の関係を表していま 
す 。 

•なにもなし（メジャー） 

JJ 一全十全一」」一全+半一 JJ 

• m (マイ ナ ー〉 

JJ 一全+半一」」一全十全一 JJ 

•dim (デイミニツシユ） 

JJ 一全+半一 JJ 一全+半一 JJ 

• aug (オー ギュメント） 

JJ 一全十全一」」一全+全一 JJ 

コードにこういった区別があるのは，コ 


650 
660 
670 
680 
690 
700 
710 
720 
730 

740 m_tempo( 160 ) 
750 /* 


19, 2,1, 4, 3, 31, 2,1, 4, 0, 0, /* OP 3 

19, 2,1, 4, 3, 0, 3,1, 7 ， 0, 1) / 本 OP 4 

/* 

m_vset( 73 , va3) 

/* 

for i = 70 to 73 : print " この滴麥は音色 "； i ; です •• 

/* 

m_init() : for j=1 to 5 : m_alloc(j,2000) : next 


760 

m trkU , "VIS 

i L8 ，.） 

: m_trk( 1 ， ”@ 

"+str$(i)) 



770 

m trk(2, M V8 

L8") 

: m_trk<2,”@ 

"+str$ ( i) ) 



780 

m trk(3,”V8 

L8") 

: m_trk( 3, 

M +str$(i)) 



790 

m trk(4,"V8 

L8") 

: m trk( 4, 

"+str$ ( i )) 



800 

m_trk(5,"V8 

L8" > 

: m trk( 5 , "@"+str$ ( i )) 



810 

m_trk ( 1 , "04 

A4 | : 

05 D2.{ERF14 

E2&>A8R8A4 

<D2C4>(GR<C}4 

>A2. R4 " ) 

820 

m trk ( 2 ," 

R4 | : 

04 DDDDDDDD 

EEEEEEEE 

DDDDEEEE 

FFFFFFFF" ) 

830 

m~trk(3," 

R4 | : 

03 AAAAAAAA 

<CCCCCCCC 

>B+B+B+B+<CCCC 

CCCCCCCC") 

840 

m trk(4，" 

R4 | : 

03 FFFFFFFF 

AAAAAAAA 

FFFFGGGG 

AAAAAAAA" ) 

850 

m trk(5," 

R4 | : 

03 RRRRRRRR 

GGGGGGGG 

RRRRRRRR 

RRRRRRRR" ) 


860 m_trk(1," 
870 m_trk(2," 
880 m_trk(3," 
890 m_trk(4," 
900 m=trk<5," 
910 m_trk(1," 
920 m_trk(2," 
930 m_trk(3," 
940 ra_trk(4, M 
950 m_trk(5," 


104 G2A4JERG)4 F2&FA<DE F4F4G4.F E2.>A4 
104 EEEEEEEE DDDDDDDD DDDDDDDD DDDDC+C+C+C+ 

104 C+C+C+C+C+C+C+C+ >AAAAAAAA BBBBBBBB AAAAAAAA 
103 AAAAAAAA FFFFFFFF G+G+G+G+G+G+G+G+GGGGGGGG 

103 GGGGGGGG RRRRRRRR FFFFFFFF RRRRRRRR 

2 04 G2A4R8<E8 F2&F>A<DE F4F4G4.F E2.E4 

2 04 EEEEEEEE DDDDDDDD DDDDDDDD DDDDC+C+C+C+ 

2 04 C+C+C+C+C+C+C+C+ >AAAAAAAA BBBBBBBB AAAAAAAA 
2 03 AAAAAAAA FFFFFFFF G+G+G+G+G+G+G+G+GGGGGGGG 

2 03 GGGGGGGG RRRRRRRR FFFFFFFF RRRRRRRR 


960 m_trk(1,"05 F2EDOB- A2.A4 G4AB-A4G4 F2&FFAF <D4>{FFF»4A<D4E FRG2F4") 

970 m_trk(2,"04 DDDDEEEE EEEEEEEE FFFFEEEE FFFFFFFF FFFFFFFF FFFFFFFF '* ) 

980 m_trk(3,"03 B-B-B-B-<CCCCCCCCCCCCDDDDC+C+CfC+>AAAAAAAABBBBBBBBBBBBBBBB") 
990 m_trk(4,"03 GGGGGGGGAAAAAAAAB-B-B-B-AAAAFFFFFFFFAAAAAAAAG+G+G+G+G+G+G+G+") 
1000 m_trk(5,"03 RRRRB-B-B-B-FFFFFFFFGGGGGGGG RRRRRRRR FFFFFFFF FFFFFFFF") 

1010 m 二 trk(l,"05 E2.>A4 <F2E4F&E D2.D4 B-2A&GF4G A2C2 M ) 

1020 m_trk(2,"04 R4E.D16C+2 R>A<D>ARA<D>A RFB-FRFBF RDFDREB-E RCECRCEC") 

1030 m_trk(3,"03 GA&A2. D2C2 >B-2A2 G2 く C2 >F2F2 *') 

1040 ra_trk(4,"03 R1 R1 R1 R1 R1 "> 

1050 m_trk(5，"03 R1 R1 R1 R1 R1 H ) 

1060 m_trk(1,"05 G2F&ED&E F2.F4 E4.EE&DC + &D E2.>A4") 

1070 m_trk(2,"02 RB-<D>B-R<EGE RAB<C+DEF4 >RDFARDEG+ REDEA2") 

1080 m=trk<3，"02 E2A2 <D1 B2B2 A1 ") 

1090 m_trk(4 l ,, 03 R1 R1 R1 R1 ") 

1100 ro_trk(5,"03 R1 R1 R1 R1 ") 

1110 m_trk(1 ,"05 D2.{EEF}4 E2.>A4 <D2C4>{GG<C}4 >A2.A4 G2.(AR<E)4 F2G2 A2.R4") 

1120 ra_trk(2, ,, 04 DDDDDDDD EEEEEEEE DDDDEEEE EEEEEEEE DDDDC+C+C+C+ DDDDDDDD D2.R 


1130 m_trk(3,"03 AAAAAAAA<CCCCCCCC>B-B-B-B-<CCCCCCCCCCCCB-B-B-B-C+C+C+C+AAAAB-B 
-B-B- A2.R4") 

1140 m_trk(4,"03 FFFFFFFF AAAAAAAA FFFFGGGG AAAAAAAA GGGGGGGG FFFFGGGG G2.R4") 
1150 mltrk(5,"03 R1 GGGGGGGG R1 FFFFFFFF EEEEEEEE R1 E2.R4") 

1160 /* 

1170 m_play() 

1180 /i 

1190 while m_stat() : endwhile 

1200 next 
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図5 U ズ厶パターン 

2 Beat ® 
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ードが音階（キー）を元にして作られてい 
るからです。すなわち，コードとは音階の 
なかで3つの音をひとつおき （3 度の音程） 
に拾ったものにほかなりません。図6に長 
音階（ハ長調）と短音階（イ短調）の例を 
示します。これらの音階の上にコードを作 
る（ひとつおきに3つの音を拾う）と図7 
に示すような名前のコードができるのです 


(コードの命名は意外と安直なのですよ）。 

なお，図6で示す短音階には G の音に# 
が付いています。これは短音階のうち，和 
声的短音階と呼ばれる音階です（ほかに自 
然的短音階，旋律的短音階がありますが， 
ここでは省略ね)。紙に書かれたコードだけ 
を見ていても実感がわきませんから ， MM 
L で演奏してみましよう（楽譜を見ただけ 

リスト3 リズ厶パターン演奏プログラム 


で実感できる人がうらやましいなあ)。その 
プログラムがリスト4 (長音階）とリスト 
5(短音階）です。8重和音を特長とする0 
PM では，たかが3音の和音なんてたやす 
いことですね。 

さて，音楽の演奏ではメロディが移り変 
わるのに従って，コードも移り変わってい 
きます。このコード進行には，クラシック 


10 /t 

20 /* リズム 
30 /* 


40 int. i 

50 dim str rhyO (1 3 ) f 50 J ( rhy 1 ( 


15)150],rhv2{15)1501 


60 rhyO(O) 
70 rhyl (0)= 
80 rhy2(0)= 
90 rhyO<1 )= 
100 rhyl( 1)= 
110 rhy 2( \)= 
120 rhy0(2)= 
130 rhylt 2)= 
140 rhy2{2)= 
150 rhyOt 3)= 
160 rhyH 3)= 
170 rhy2( 3)= 
180 rhyO{ 4 ) = 
190 rhy1(4)= 
200 rhy2(4)= 
210 rhy0(5)= 


Beat 1' 
R4E4R4E4 
A2 A2 
Beat 2 " 


()3 R8E8R8E8" 

02 A 4 A 4 
2 Heat 3 (Jazz)" 

0：J C4 tCCC}1C4 {CCC H" 

02 F4R4 F4R4 " 

1 Beat 4 // I Beat 1.. 
()3 d8C8C8m ， 

02 F4. F4 . ” 

2 Beat 5 (Tango)" 

03 V8 F8F8F8F16 V10 F16.. 
02 A8A8A8A8 " 

2 Beat 6 (Habanera )" 


220 rhyl (5)= 
230 rhv2( 5)= 
240 rhy0{6)= 
250 rhylI 6 )= 
260 rhy2l6)= 
270 rhy0(7)= 
280 rhyl(7)= 
290 rhy2(7)= 
300 rhy0(8) 
310 rhyl(8) 


H8K16E16E8E8 E16E8E16E8H8" 
A8H16A16A8A8 A16A8A16A8A8" 
Beat 1(Waltz) // 6 Beat 1，• 

R4E4E4" 

A2. .， 

Beat 2 (Jazz) // 6 Beat 2 ，、 

E4|EEE}4E4" 

A4 A4 A4 .， 

Beat 3.. 

E8E8E8E8E8E8E8E8E8" 


320 rhy2(8}="02 A4• A4. A4. 

330 rhy0(9)=" 4 Beat 2 (Jazz)" 

340 rhyl (9)= n 03 E4 丨 EEE 丨 4E4 {EEE} 4 •• 

350 rhy2(9)=._02 A4A4 A4A4 " 

360 rhy0( 10)=" 8 Beat 1(Rock ド 

370 rhyl(10) ="03 V8E8E8V10E8V8E8 F.8E8V10E8V8E8" 

380 rhy2(10)="02 A4 R8 A8 A4 R8 A8" 

390 rhy0(11)=" 8 Beat 2 (Latin)*' 

400 rhyl<11 >=”03 E8E8E8E8E8E4E8 & E8E4E8E8E8E8E8" 

410 rhy2(11)="02 A4 R8A8A4R4 A4R8A8A4 R4 ” 

420 rhyO(12)="16 Beat 1(Rock)" 

430 rhyl(12)=”03 L16 V8EEEE V10EV8EEE EEEE V10EV8EEE" 

440 rhy2(12)= M 02 L8 A A R16 AR16 A R R16 A16A" 

450 rhy0( 13)="16 Beat 2 (Latin )，， 

460 rhyl(13)= M 03 L16 V10EV8EEE V10EV8EEE V10EV8EEE V10EV8EEE" 
470 rhy2(13)="02 L8 AR16A16 A R AR16A16 A R " 

480 /% 

490 for i=0 to13 
500 print rhy0(i) 

510 m_init() 

520 m!alloc(1, 300) : m_alloc(2,300) 

530 m„assign(1,1) : m_assign(2,2) 

540 m_tempo(120 > 

550 mltrk(1,"V8@59") : m_trk<2 ， "V8@48") 

560 while (m_free(1)>100) and (m_free(2)>100) 

570 m_trk(1,rhyl(i)) : m_trk(2,rhy2(i)) 

580 endwhile 

590 m_play() 

600 while m_stat() : endwhile 

610 next 


図 6 長音階と短音階 


長音階（ハ長調) 



CDEFGABC 

I- 1 I_ 1 1_ 1 1_ I I_ I I_ I I_I 

全 全 半 全 全 全 半 



短音階（イ短調) 



図日古典的コード進行 

C (ハ長調） 


初めの 

コード 

次のコードの順位 

第1級 

第2級 

第 3 級 

第 4 級 

c 

F G 

Am Em 

Dm 


Dm 

G 

Am 

C Em 

F 

Em 

F 

Am G 

Dm 

C 

F 

C G 

Dm Em 


Am 

G 

C Am 

Em 


Dm F 

Am 

F Dm 

G Em 


C 


図7 メジャーコードとマイナーコード 

① メジャーコード 



C Dm Em F G Am Bdim 


②マ イナーコード 

•- ••- " 1 — 
部 , R … h さドニ' — ..一 

Am Bdim Caug Dm E F G#dim 


Am (イ短調） 


初めの 
コード 

次の コー ドの順位 

第 1 級 

第 2 級 

第 3 級 

第 4 級 

Am 

Dm E 

F Bdim 



Bdim 

E 




Dm 

Bdim Am 

E 



E 

Am F 



F 

F 

Dm E 

Bdim Am 


Dm 
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音楽などの時代から伝わる一般的な規則が 
あって，現代の音楽にもかなりの影響を与 
えているようです。図8がハ長調と卜短調 
における古典的なコード進行です力 5 '，この 
コード進行を MML で演奏してみます。図 
でわかるように，あるコードに対して次の 
コードは一意には定まりません。そこで， 
乱数を用いてコードを決定することにしま 
す。 

簡単にするため，ここでは第1級と第2 
級のコードのみを使った進行を行いましょ 
う。もちろん，第1級のコードが選ばれる 
確率は第2級のコードよりも高いものとし， 
同じ級のコードは同じ確率で選ばれるもの 
とします。このような方針で作ったプログ 
ラムがリスト6です。プログラムのアルゴ 
リズムは次のようになっています。 

• チヤンネル1~ 3を使用してコードを演 
奏する0チヤンネル番号はトラックの番 
号に等し〈する。 

•最初のコードは，長調ならば C ， 短調な 
ら (iTAnio 

•あるコードの次のコードは，長調ならば 
nxt _ cod _ maj 関数にょり，短調ならば nx 
t _ cod _ min 関数によって求める。求め方 
は図8の表に従うものとする。 

• トラックバッファの容量がなくなるか20 
小節分のコードを設定するまで，コード 
の設定を繰り返す。 

• トラックバッファへの設定が終わったら 
演奏する。 

この程度の説明でプログラムはわかると 
思います。まあ，あれこれ考えるより，実 
際に入力してみましょう。実際に演奏して 
みると，さすが古くから生き残ってきたコ 
ード進行だけあって，心地よい響きを持っ 
ていますね。 

3) メロディ 

メロディとは，高さや長さの異なる音の 
連続的な進行です。メ ロディは曲そのもの 
を決定づけてしまいますから，代表的なメ 
ロディというものはありません（あったら 
盗作だ)。まあ，音の流れ方（連続する数個 
の音の関係，始まりと終わりの音）につい 
ての法則があるくらいでしょうか。既存の 
曲のメロディをそのまま MML で演奏して 
も楽しくない（えっ，そっちのほうがいい 
って？）ので，ここではコード進行の例と 
同様に乱数を用いてメロディを作り出して 
みましょう。ただ，本当に乱数だけを用い 
たのでは，ほとんど意味不明のメロディが 
できてしまいますから，音の生成にある程 
度の規則をつけます。つまり，次のような 
規則です。 


リスト4長音階コード演奏プログラム 


10 /本 

20 /* コードの崠習（畏調） 

30 /本 

40 minit() 

50 /* 

60 m alloc( 1 ,800) : m_alloc(2, 800 ) : m_alloc(3,800) 

70 /* 

80 m_assign(1,1) : m_assign(2,2) : m_assign(3,3) 

90 /* 

100 m_tempo(120) 

110 /* C 

120 m_trk(1,"cccc") : m_trk(2,"eeee") : m_trk(3,"gggg") 

130 /t Dm 

140 m_trk(1,"dddd") : m_trk(2,"ffff M ) : m_trk(3, M aaaa") 

150 /* Em 

160 m_trk<l,"eeee”> : m_trk(2,"gggg") : m_trk(3,"bbbb") 

170 /* F 

180 m_trk(1,"ffff") : m_trk(2,"aaaa M ) : m_trk(3,"<cccc>") 

190 /t G 

200 m_trk(l,"gggg"} : m_trk ( 2 , "bbbb'*) : m_trk ( 3 ,<dddd>") 
210 /* Am 

220 m_trk(1,"aaaa") : m_trk(2,"<cccc>") : m_trk(3,"<eeee>") 
230 /* Bdim 

240 m_trkU , "bbbb" ) : m_trk ( 2 , ,f <dddd> M ) : m_trk ( 3 , " <ff ff > ") 

250 /* 

260 m_play(1,2,3) 


リスト 5 短音階コード演奏ブログラム 

10 /* 

20 /* コードの練涔《短调） 

3« /% 

40 m ini t •い 
50 /t 

60 m_alloc(1,H«») : m_a i loc( 2,800 ) : m_a1loc(3 , 80« ) 

70 /* 

80 m assign(1,1) : m assign(2,2) : m_assign{3,3) 

90 /* 

100 m tempo( 120) 

110 /* 

120 /* Am 

130 m trk (1, ">aaaa< " ) : m_trk ( 2 , "cccc" ) : m_t.rk( 3 , "eeee") 

140 /* Bdim 

150 m_trk( l,">bbbb< M ) : m_trk ( 2 , "dddd " ) : m_t.rk ( 3 , " f tTf ") 

160 /* Caug 

170 m_trk(1, "cccc" ) : m_trk ( 2 , ,, eeee" ) : m_trk ( 3 , "g+g + g+g+") 
180 /* i)m 

190 m_trk( 1, "dddd") : m_trk { 2 ,"ffff" ) : m_trk ( 3 ,"aaaa") 

200 /* E 

210 m_trk(1, "eeee" ) : m_trk(2,"g+g+g+s+" ) : m_trk( 3 , "bbbb") 

220 /* F 

230 ra_trk(l ， "ffff”> : tn_trk ( 2 , "aaaa" ) : tn_trk ( 3 , " <cccc> H ) 

240 /* G#ditn 

250 m_trk{1,"R+«+g+g+") : m_trk(2,"bbbb") : m trk(3,"<dddd> H ) 

260 /本 

270 m_play(1,2,3) 


リスト 6 単純コード進行プログラム 


10 /* 

20 /* ランダムコード進行 
30 /本 

40 int s=0 

50 int chos i =1 /* 0 は長調 1 は短網 

60 str chord="C" 

70 input "0 ->長洲 卜〉短拥 chosi 
80 if chosi =1 then chord="Am" 

90 rnd_init() 

100 m_init() 

110 mlalloct 1,800) : m_.al Loc ( 2,800 ) : m_al loo ( 3, 800 ) 

120 m_assign(1,1) : m_assign(2,2) : m_assign<3 ， 3) 

130 m=tempo(120) 

140 m_trk(l,..V15 @1 P3 L4") 

150 m_trk(2,"V15 @1 P3 L4") 

160 m_trk(3,"V15 @1 P3 L4'*) 

170 /* 

180 while nokori(3) and (s<20) 

190 C_set(1.chord) 

200 if chosi=0 then chord=nxt_cod_maj(chord) else chord=nxt_cod_min(chord) 


210 

if (s mod 4)=3 then print 


220 

s = s + 1 




230 

endwhile 




240 





250 

m play(1,2 « 3) 




260 

/* 




270 

end 




280 

/* 




290 

/* コードを設定する 



300 

/* 




310 

func C_set(t,c 

； str) 



320 

color 2 : print 

c,; 

: color 3 


330 

if c="C" 

then 

c cm 

return() 

340 

if c="Dm" 

then 

C Dm(t) 

return() 

350 

if c="Em" 

then 

C Em(t) 

return() 

360 

if c="F" 

then 

C_F(t) 

return() 

370 

if c="G" 

then 

C G( t) 

return() 

380 

if c=..Am" 

then 

C_Am(t) 

return() 

390 

if c="Bdim" 

then 

C_Bdim(t) 

return() 

400 

C E( t) 
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• 音階は長音階のみ。 

• 音の長さは全音符，2分音符，4分音符， 

8分音符のうちのどれかで，出現する確 
率は， 

全く 2分く 8分く 4分 
の順とする。 

•最初の音はド （ C )， ミ （ E )， ソ （ G ) のう 
ちのどれかで，使用する確率は， 

ド< ミ< ソ 
の順とする。 

• 連続する2つの音の関係は1度から6度 
の間とし，出現する確率は， 

5度< 6度 < 1度< 4度< 2度< 3度 
の順とする。 

以上のような4つの規則に従ってメ ロデ 
イを作るプログラムがリスト7です 0 プロ 
グラムの説明を簡単にしましよう。音の選 
び方!：しては長調（ハ長調）を仮定してい 
ますから， 

C ， D ， E ， F ， G ， A，B 
のみを用います。高さの度数の計算もこれ 
らの音の間で計算します。これが基本です。 
実際の動作は，まず，最初の音（名）を sa 
isho 関数で，音長を nagasa 関数で決定しま 
す。そのあとは takasa 関数によって音名を， 
nagasa 関数によって音長を求め，それを nn 
n 開数によって MML に変換しながらトラッ 
クバッファ1に入れていき，これをトラッ 
クバッファが空になるまで（正には，残 
り容量が30バイト以下になるまで）繰り返 
します。そして，最後に演奏を始めます。 
要はこれだけのプログラムで，くどくど説 
明してもしようがないのですが，音名 （tak 
asa 関数による）を求める関数は多少複雑な 
のでもう少し詳しく説明します。先に述べ 
たように，音名はひとつ前の音に対して， 
高さの差が， 

5度<6度< 1度<4度< 2度< 3度 
の確率で現れるように求めます。しかし， 
高さの差を決めただけでは，それが前の音 
より高い音なのか低い音なのかが決まりま 
せん。そこで，ここではオクターブ4に向 
かう方向に変化するようにします。つまり， 
ひとつ前の音のオクターブ ( oku という変数） 
を覚えておいて，もし，それが4より高い 
オクターブであれば，次の音は前の音より 
も低い音にします。一方，ひとつ前の音の 
オクターブが4より低ければ，次の音は前 
の音より高い音にします。リスト7では， 
常にそうしているわけではなく，確率的に 
そういう傾向を持たせているので複雑にな 
っているのです。 

また，オクターブ0と8においては使え 
る音が限られるため，ここでオクターブ0 


410 

420 

430 

440 

450 

460 

470 

480 

490 

500 

510 


530 
540 
550 
560 
570 
580 
590 
600 
610 
620 
630 
640 
650 
660 
670 
680 
690 
700 
710 
720 
730 
740 
750 
760 
770 
780 
790 
800 
810 
820 
830 
840 
850 
860 
870 
880 
890 
900 
910 
920 
930 
940 
950 
960 
970 
980 
990 
1000 
1010 
1020 
1030 
1040 
1050 
1060 
1070 
1080 
1090 
1100 
1110 
1120 
1130 
1140 
1150 
1160 
1170 
1180 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 
1370 
1380 
1390 
1400 
1410 
1420 
1430 
1440 
1450 


: m trk(t+2 , "bbbb") 


endfunc 
/* C 

func C C(t) 

m_trk(t,"cccc") : m_trk(t+1,"eeee") : m_trk(t+2, "gggg") 

endfunc 
/* Dm 

func C_Dm(t) 

m_trk(t, ,, dddd , ') : m_trk(t+1,"f f ff " ) : m_trk(t + 2 , "aaaa") 
endfunc 
/* Em 

func C_Em(t) 

m_trk(t,"eeee") : m_trk(t+1,"gg 

endfunc 
/* F 

func C_F(t) 

m_trk(t, "ffff") : m_trk( t+1,"aaaa" ) : m_trk (t. + 2 , " <cccc> ") 

endfunc 

/ 本 G 

func C_G(t) 

m_trk け . ， . .gggg") : m_trk(t+1,"bbbb") : m_trk(t + 2, M <dddd>") 
endfunc 
/ 本 Am 

func C_Am(t) 

m_trk(t,">aaaa<") : m_trk(t+1,"cccc") : m_trk(t+2,"eeee") 

endfunc 
/本 Bdim 

func C_Bdim(t) 

m^trkt t, ,, >bbbb<*') : m_trk (t+1, ,, dddd M ) : m_trk (t.+2 , "f f f f ") 

endfunc 
/* E 

func C_E(t) 

m trk (t, "eeee"} : m_trk ( t + 1,"g + g + g + g +'*) : m_trk{ t + 2 , "bbbb") 
endfunc 

/* つぎのコード（長調） 

ハ 

func str nxt_cod_maj { c ； str) 
if c=..C" then T 

if ransu(2)=1 then return( either("F","G")) 
return( either("Am","Em")) 

} else if c="Dm" then { 

if ransu(2)=1 then return( "G") 
return( "Am") 

} else if c="Em" then { 

if ransu(2)=1 then return( "F") 
return( either("Am" , "G")) 

} else if c="F" then { 

if ransu(2)=1 then return( either("C","G")) 
return( either("Dm","Em")) 

} else if c = ， .G .， then { 

if ransu(2)=1 then return( either("C","Am")) 
return( "Em") 

} else | /* Am 

if ransu(2)=1 then return( either("F","Dm")) 
return( either("G","Em")) 

} 

endfunc 
/* 

/* つぎのコード（短 _ ) 

/* 

func str nxt_cod_min(c ； str) 
if c="Aro" then { 

if ransu(2)=1 then return( either("Dm","E")) 
return( either("F","Bdim")) 

} else if c=’’Bdim" then { 
return( "E") 

J else if c="Dm" then { 

if ransu(2)=1 then return( either("Bdim","Am")) 
returnt "E") 

} else if c="E” then { 

return( either("Am","F")) 

} else { /* F 

if ransu(2)=1 then return( either("Dm","E")) 
return( either("Bdim","Am")) 


/* どちらかの文字列を遘択 
ハ 

func str either(a ； str,b;str) 

if int(rnd ()* 2 ) then return(a) else return(b) 
endfunc 

/* 

/* 乱数の初期化 


func rnd_init() 

str t : int h,m，s 
t=time$ 

h = val(lef t$(t,2)) : m = va 丄 （ mid$(t, 

randomize((h 本 m 本 s)and &H7FFF) 
endfunc 
/* 

/* 残りトラック 


func int nokori(n) 
int p=-1, i 

for i =1 to n : p=p and (m_free(i)>50) : next 

return(p) 
endfunc 
/* 

/* 乱数 （0 に近い储ほど出にくい） 

ハ 

func int ransu(n) 

return( int(sqr(rnd())*n)) 
endfunc 


, 2 ) ) : s = vaJ(mid$(t, 7 , 2 ) ) 
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をオクターブ 1 に，オクターブ8をオクタ 
ーブ7に無理矢理変更するという手抜きを 
やっています。しかし，オクターブは4に 
向かうようにしてあって，オクターブ0と 
かオクターブ8になることが確率的に小さ 
いので問題はないでしょう。それなら，最 
初から小細工をするなといわれそうです力夂 
すこ またまオクターブの0や8になったとき 
エラーで止まるのがいやだっただけです。 

それでは，リスト7のプログラムによっ 
て作られたメ ロデイの冒頭部分を図9に示 
しましよラ Q 


自動作曲プログラム 


これまで，リズム， ハーモニー，メロ デ 

イと，音楽の構成要素を細切れに見てきま 
したが，ここでは，それらを組み合わせる 
ことを考えましよう。つまり，作曲をする 
プログラムです。確かに，音楽を作曲する 
には才能が必要です。しかし，こちらには 
乱数という強い味方がついています。この 
乱数によって，いろいろな曲を次々と無限 
に作り出し，売れっ子作曲家の気分を味わ 
ってみることにしましよう（でも，この場 
合の作曲者は「乱数」.ということになるの 
かな)。 

1) アルゴリズム 

この作曲プログラムの原型はリスト6の 
コード進行プログラムです0まず，乱数に 
よってコードの進行を決めます。このとき， 
コードの演奏はリスト6と同じく 


というリズムで演奏します。少し単調です 
が，まあ，典型的な4分の4拍子ですね。 
そして，このコード上にメロディを載せる 
のです。メロディはコードを構成する3つ 
の音を基本として作りますが，コードを作 
る音しか出現しない曲というのはまれです 
から，ときどきコード以外の音も混ぜてや 
ることにしましよう。 

メロディの決め方は，基本的には，リス 
卜7のメ ロディ作成プログラムと同様に， 
ひ!!つ前の音に対する高さの差を乱数で決 
めて次の音を求めることにします。このと 
き，求めた音がコードを作る音でないとき 
は，確率的にコードを作るいちばん近い音 
に補正してやります。確率的というのは， 
ごくまれにはコードを作らない音であって 
も，最初に求めた音をそのまま使うという 
ことです。さて，一度決めたコードは1小 
節にわたって有効とすることにしましよう。 

このとき，そのコードに対する1小節分 


リスト7 メロディ作成プログラム 


10 /*でたらめ自觔作曲 

20 /拿 

30 dim str nnU 11= 「で " , "C+" , "D" , "D+" ， "E V.F.. ， "F+" , ”G_. • "G+” ， "A" • "A+" ， ”B ”） 
40 dim char onkai(6)=10,2,4,5,7,9,11) 

50 int 1,n , oku=*l, o ld_oku= l 
80 rnd_init() 

70 /* 

80 m init( ) : m_alloc(1, 1000 ) : m_assign(1,1) : m_tempo(120) 

90 nO.rkU , "VlMei") 

10(3 /本 

110 1=nagasa() : n=saisho() : m_trk(1,nnn(1,n)) 

120 /* 

130 while m 一 free(11>30 

140 T = nagasa( ) : n=takasa( n) : m._trk(1,nnn(1,n )) 

150 endwh.ile 
160 ハ 

170 m_play(1) 

180 /i 
190 end 
200 ハ 

210 /* 乩数の初期化 
220 /* 

230 func rnd_init() 

240 str t : int h,m,s 
250 t=time$ 

260 h=val(left$(t,2)) 

270 m=vai(mid$(t,^,2)) 

280 s=val(mid$(t,7,2)) 

290 randomize<(h*m*s} and &H7FFF) 

300 endfunc 
310 /* 

320 /* 乱数 , 

330 /本 

340 func int ransu(n) 

350 return( int(sqr(rnd())*n)) 

360 endfunc 
370 /* 

380 ft 乱数（その 2 > 

390 /* 

400 func int ransu2(n) 

410 return( int(sqr(sqr(rnd ()))*n)) 

420 endfunc 
430 /* 

440 /% 音の高さと長さを MML に変換 
450 /* 

460 func str nnn(1,n) 

470 str r 

480 r=nn(onkai(n))+str$(l) 

490 if oku< >*old_oku then r="0"+str$ (oku) +r 

500 old_oku=oku 

510 print chr$(5);r ;""； 

520 return(r) 

530 endfunc 
540 /* 

550 /* 最初の音 
560 ft 

570 func int saisho<} 

580 switch ransu(3) 

590 case 0: return(0) 

600 case 1:return(2) 

610 default:return(4) 

620 endswitch 

630 endfunc 
640 /* 

650 / 本良さ 4 > 8 > 2 > 1 の順 
660 ハ 

670 func int nagasa() 

680 switch ransu(4) 

690 case 0: return(2) 

700 case 1:return(4) 

710 default ： return(8) 

720 endswitch 
730 endfunc 
740 /* 

750 高さ差が 3>2>4>1>6>5 の顧 
760 /* 

770 func int takasa(mae) 

780 int i 

790 switch ransu(6) 

800 case 0: i=4 : break 
810 case 1:i=5 : break 
820 case 2: i=0 : break 

830 case 3 : i=3 : break 

840 case 4 : i=1 : break 
850 default ： i=2 : break 
860 endswitch 
870 if oku>4 then { 

880 if ransu2(2) then i= -i 

890 } else if oku<4 then { 

900 if ransu2(2)=0 then i= -i 

910 ) else { 

920 if int<rnd<) 本 2> then i= -i 

930 ) 

9‘10 L = i+mae 
950 if i<0 then { 

960 oku=oku-1 : i=i+7 

970 lelse if i>6 then{ 

980 oku=oku+l : i=i-7 

990 | 

1000 if oku=0 then oku=1 

1010 if oku=8 then oku=7 

1020 return( i ) 

1030 endfunc 
1040 /零 
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のメロディを作らなければなりません。ひ 
とつの音の長さはリスト7と同様に決めま 
すが，ここではその長さを覚えておいて， 

1小節分のメロディができるまで 
•ひとつ前の音から，乱数によって次の音 
を作り出す（大部分は指定したコードを 
構成する音になるようにする)。 

•乱数によって音の高さを決める（オクタ 
ーブの処理はリスト7と同じ)〇 
という操作を繰り返すことにします。1小 
節分の長さを計算するためには，得られる 
音の長さを 

全音符— 8 

2 分音符— 4 
4分音符— 2 
8分音符—1 

として（これ以外の長さは出現しないよう 
にしてある），合計が8になるまで先の操作 
を繰り返します（わかりますね)。しかし， 
このままだと，たとえば，長さに対応する 
数値の合計が7のところで，次の音符が2 
分音符（数値 4) だった場合など，合言十が 
7 + 4 =11で8 ( 1小節分）を越えてしま 
います。こういう場合は次の音を加えず休 
符を1小節の長さになるまで埋めることに 


乱数に関する基礎知識 


X-BASIC では乱数を発生する関数として， rnd 
関数と rand 関数が用意されています。このうち， 
rnd 関数は 0 以上丨未満の乱数を発生し， rand 関 
数は0以上2 15 未満の乱数を発生します。明らか 
に2つの乱数関数の関係は 
rand( )=int (rnd( ) X2 15 ) 

となっています。また，0以上 n 未満の乱数を 
発生する関数は 
int(rnd( )Xn) 

という式で作り出すことができます。 

ところで， rnd 関数や rand 関数は一様乱数と呼 
ばれる乱数，つまり，すべての数値の発生確率 
が同じ乱数を発生します。このため，今回のよ 
うに，ある数値と別の数値の発生する確率が異 
なる乱数を発生させる必要がある場合は，少々 
細工をしなければなりません。その一例として 
平方根があります。 
sqr(rnd()) 

は rnd 関数と同じく， 0 以上 I 未満の乱数を発生 
します。このとき，たとえば， 0.5 未満の乱数 
を発生させるためには， rnd 関数の値は 0.25 未満 
でなくてはなりません。つまり， rnd 関数の平方 
根でできる関数は， rnd 関数に比べて 0.5 未満の 
乱数を発生する確立が小さくなっています。同 
様に考えていくと，これは0に近い値ほど出に 
くくなる関数であることがわかります。そこで, 
0以上 n 未満の乱数を発生する関数で，0に近 
い値ほど出にくくなる関数は 
int(sqr(rnd( )) Xn) 

という式に従って作ればよいことがわかります。 
さらに， 

int(sqr(sqr(rnd( )) j Xn) 

では， 0 に近い値がさらに出にくくなります。 


図9乱数によるメロデイ（冒頭） 
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図 10 自動作曲（冒頭） 
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U スト 8 自動作曲プロク;ラ^ 


, old n , s = 0 , ma n t r = 8 , 〇 wari 


20 /* 『これで私も作曲家」フログラム 
30 /* 

4 0 dim str nn( 11 ) = TC 11 ,'• 〇 +" , "D" , "D+" , "E" , •'K" , ,, F+ , ' , •'G* 1 , , ， G+ , ' , "A- 
50 dim char onkai(6)={0,2,4,5,7,9,ll} 

60 int oku=J,old_ok«=4,sum_nag,tmp_nag, 

70 dim int save_n(8) 

80 dim int sa\ e_oku( 8 ) = 4, 4,-1,4,4,4,41 

90 int chosi =0 /* 〇は長調 1 は fe 湖 

100 str rhord="C" , tmp_st r 
110 input "0-> 民调 丨 -> 短調”； chosi 
120 if ohosi =1 then c'hord = "Am" 


130 rnd. 
140 m ir 
150 for 
160 for 


n i t () 
t() 


8 : m_alloo(i,800 

i=1 to maxt r : m_assign(i t i) 
170 m_tempo(120) 

180 mltrk(1,"V10 @1 
190 m_trk(3, ,, V10 @1 
200 m_trk(5,"V15 @1 
210 m_trk(7, M V15 @1 
220 /* 

230 owari=0 : s=0 
240 for i=4 to maxt 
250 /* 

260 while nokori(maxtr) 


next 

next 


P3 

Ll") 

: m trk(2, M V10 @1 

P3 

L4 M 

P3 

L4") 

: m trk(4 ， "V15 @1 

P3 

L4° 

P3 

IA") 

: m trk(6 f "V15 C-l 

P3 

L4" 

P3 

し 4” 

: m_t.rk(8, ,, V15 @1 

P3 

L4" 

: save 一 

n(i ) =saisho_go{) : 

next 


270 

28t3 

290 

300 

310 

320 

330 

340 

350 

360 

370 

380 

390 

400 


if s>10 then { 

if (chosi=0)and(chord="C") then break 
if (chosi=l)and(chord="Am") then break 


: color 3 : end_C(1,chord) 


C_set(1,chord) 
for i=4 to maxtr 

old_n=save_n(i) : oku=save_oku(i) : old_oku=oku 

print shosetu(i,chord)；" ”； 

save_n(i)=old_n : save_oku(i)=oku 
next 

if chosi=0 then chord=nxt_cod_maj(chord) else chord=nxt_cod_min(chord) 
for i=4 to maxtr : save_n(i)=takasa(save_n(i),chord) : next 

print 
s = s + 1 
410 endwhile 
420 /* 

4 30 color 2 : print chord, 

440 for i=4 to maxtr 

4 50 oku=save_oku(i) : old_oku=oku : tmp_str=nnn<1 ， saisho_go(" 

460 m_trk(i,tmp_str) : print tmp_str ；""； 

470 next 
480 print 
490 /本 

500 m_play(1,2,3,4,5,6,7,8) 

510 /* 

520 end 
530 /* 

540 /* コードを設定する 
550 /* 

560 func C_set(t,c ； str) 

570 color 2: print c, : color 3 
580 if c="C" then ( 


m_trk(t+2,"gggg") 
m_trk(t+2,"aaaa") 


590 m_trk(t,"cccc") : m_trk(t+1,"eeee") 

600 } else if c="Dm" then { 

610 m_trk(t,"dddd") : m_trk(t+1,"ffff") 

620 } else if c="Em M then { 

630 m trk( t, "eeee" ) : m_trk (t+1,"gggg" ) : m_trk (t.+2 , "bbbb ") 

640 } else if c="F__ then T 

650 m_trk(t,"ffff") : m_trk(t+1,"aaaa") : m_trk(t+2,"<cccc>") 

660 } else if c="G" then T 

670 m_trk( t, "gggg" ) : m_trk (t+1, ,, bbbb n ) : m_trk (t + 2 , M <dddd> ") 

680 } else if c="Am" then { 

690 m_trk(t," >aaaa<" ) : m_trk(t+1,"cccc") : m_trk(t+2,"eeee") 

700 } else if c="Bdim" then { 

710 ro_trk(t，">bbbb ぐ ，}: m_trk(t+1,"dddd M ) : m_trk(t+2ffff n ) 

720 } else { /本 E 
730 /* E 

740 in_trk(t,"eeee") : m_trk(t+1,"g+g+g+g+") : m 一 trk(t+2 ， "bbbb"> 

750 ) 

760 endfunc 
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します。先の例では，1小節には 8-7 = 

1の長さだけ足りないことになりますから， 
8分休符をひとつ付ければよいことがわか 
ります。しかし，メロデイのなかに休符ば 
かりが'現れるのは困りますから，こういつ 
た場合でもあと数回（ここでは3回）長さを 
求めてみて，それでもちょうど8にならな 
い場合は休符を埋めることにします。先の 
例では，あと3回のうちに8分音符が出れ 
ば8分休符は入れないことにします。この 
ようにして， 

• コードを決定する。 

• コードに対応する1小節分のメ ロデイを 

決定する。 

という操作を繰り返すことで曲を作ってい 
〈のです。曲の中間部は以上のようにして 
作ることができます力す，問題は始まりと終 
わりです。 

この作曲プログラムではリスト6と同様 
に，長調ならば C のコードで，短調ならば 
Am のコードで始まることにします。また， 
始まりの音は長調ならばド （ C )， ミ （ E )， ソ 
( G ) のどれか，短調なら UT ド （ C )， ミ （ E )， 
ソ （ G #)， ラ （ A ) のどれかで始まることに 
します。出現する確率は，リスト7と同様 
に，長調のときは， 

C < E<G 
短調のときは， 

C < E < G # または Am 
の順にしますが，それほど意味はありませ 
ん （ C ， Am のコードを構成する音です）。 

曲の終わりは，本来の作曲では難しいと 
ころですが，ここでは曲の最初の音と同じ 
選び方をした音を全音符で鳴らすだけにし 
ます。ただ，いきなり終わったのでは曲が 
ぶっち切れた感じがしますから，ある程度 
曲を作った段階（たとえば10小節以上を作 
った段階）で C (長調の場合）または Am 
(短調の場合)のコードになったときに，全 
音符を鳴らして終わることにします。この 
とき，最後の音はひとつ前の音とまったく 
無関係になります（オクターブは同じにし 
ます）力、硬いことはいわないようにしま 
.しょう。 

2) プログラム 

リスト8が乱数による自動作曲プロダラ 
ムです。リスト8ではチヤン ネル 1〜3で 
コードを演奏し，チヤン ネル 4〜8でメロ 
デイを演奏するようにしています。チヤン 
ネル 4〜8のメロデ、イは同じコード進行上 
に作られてはいます力す，お互いに無関係な 
メロデイを演#しています。しかし，同時 
に聞くと結構調和しているように聞こえる 
んですよ，これが（にぎやかなのが好きな 


770 
780 
790 
800 
810 
n() 
820 
830 
840 
850 
860 
870 
880 
890 
900 
910 
920 
930 
940 
950 
960 
970 
980 
990 
1000 
1010 
1020 
1030 
1040 
1050 
1060 
1070 
1080 
1090 
1100 
1110 
1120 
1130 
1140 
1150 
1160 
1170 
1180 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 
1370 
1380 
1390 
1400 
1410 
1420 
1430 
1440 
1450 
1460 
1470 
1480 
1490 
1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 
1580 
1590 
1600 
1610 
1620 
1630 
1640 
1650 
1660 
1670 
1680 
1690 
1700 
1710 
1720 
1730 
1740 
1750 


ハ 

/* おわりのコード 
/* 

func end_C(t , c ； str ) 

if c="C" then m_trk (1 1 "cl ) : m_trk( t+1,"el M ) : m_trk ( t + 2 , "gl M ) 

m_trkU ， ">al"> :m_trk(t+1,"cl M ) : m_trk(t+2, "el") 
endfunc 
ハ 

/* つぎのコード （長調） 

/* 

func str nxt_cod_maj(c ； str) 
if c="C" then { 

if ranau(2)=1 then return( either("F","G")) 
return( either("Am"Em")) 

} else if c= M Dm" then { 

i f ransu( 2) = 1 then return ( _.G” ) 
return ( "Am") 

} else if c="Em" then { 

if ransu(2)=1 then return( "F" ) 
return( ei ther("Am" , "G")) 

) else if c=..F.. then { 

if ransu( 2)=1 then return( either( "C","G") ) 
return( either <"Dm","Em"}) 

} else if c="G" then { 

if ransu(2)=1 then return( either("C","Am")) 
return( "Em") 

)else { /* Ain 

if’ ransu (2) = 1 then return ( ei ther( "F" , "Dm")) 
return( either ("G","Em") ) 

} 

endfunc 
/* 

/* つぎの コード（短迸） 

/* 

func str nxt_cod mi n ( c ； str) 
if c=" Am" then ( 

if ransu(2) = 1 then return ( either ( .’Dm’. , "E") > 

return( ei ther("F","Bdim") ) 

} else if c=" Bdim" then ( 
return( "E") 

} else if c= H Dm" then { 

if ransu (2) = 1 then return( either( "Bdim","Am")) 
return( "E" ) 

} else if c="E" then { 

return ( either ("Am'*, "F")) 

} else { /* F 

if ransu(2)=1 then return( either<"Dm” ， "E")) 
return( ei ther("Bdim","Am")) 

} 

endf unc 
/* 

/* どちらかの文字列を遺択 
/* 

func str either(a; str ,b; s tr) 

if int(rnd() <2 ) then return( a) else return(b) 
endf unc 

/* 

/* コードに対応したメロディーをつくる 
/* 

func str shosetu(trk,chord;str) 
int l,n,suro_nag,tmp_nag, i 
str mm,res 

1 magasa ( ) : sum_nag = 8 ¥ 1 

res=nnn(1,old_n) : ro_trk{trk,res) 

while sum_nag<8 

l=nagasa() : tmp_nag=8 ¥ 1 

if (tmp_nag+sum_nag)>8 then { 
for i=0 to 2 

l=nagasa ( ) : tmp_nag=8 ¥ 1 

if (tmp_nag+sum_nag) <9 then break 

next 

if (tmp_nag + sum_nag) >8 then break 

} 

sum_nag=sum_nag+ tmp_nag 
n=takasa( old_n ,chord) : old_n=n 

mm=nnn(1« n) : res = res+mm : m trk(trk,mm) 

endwhile 

if sum_nag<8 then { 

for i=1 to (8-sum_nag) : m_trk(trk,"R8") 

res=res+"R8" : next 

) 

return( res ) 
endfunc 
/* 

/* 热初と M 後の音 
/* 

func int saisho go ( ) 
switch ransu ( 3) 
case 0: return (0) 
case 1:return( 2 ) 

default：if chosi=0 then return(4) 

if int(rnd()*2) then return(5) e】se return ⑷ 



endf unc 

/* 

/* 音の高さと良さを MML に変換 

/本 

func str nnn(1,n) 
str r,s=" " 


: retur 
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んです）。 

リスト8のプログラムは，基本的には， 
リスト7の自動作曲プログラムと同様に曲 
を作ります0しかし， 5つのチヤンネルの 
演奏データを for 〜 next ループで順々に作っ 
てい〈ため，チヤンネルごとのひとつ前の 
データを save _ n (音名）， save _ oku (オクタ 
ーブ）といった配列に記憶しています。こ 
れがプログラムを読みにくくしている原因 
ではありますが，気を入れて読んでもらえ 
ばそれほど難しいプログラムでないことが 
わかると思います。ということで，プログ 
ラムの解説はこれ以上しなくてもよいでし 
ょう〇 

なお，メロデイの演奏をひとつのチヤン 
ネルだけで行いたい場合は，プログラム中 
の maxtr という変数の初期値を4 (最大4 
チヤンネルを使うという指定）にしてくだ 
さい。同時に演奏しているときにはなかな 
か聞き取ることのできなかった， X 68000 の 
作るメロデイをじっくりと聞くことができ 
ますよ。リスト8のプログラムによって作 
られる曲のうち，1チヤンネルについての 
冒頭部分を図10に示しておきます。どうで 
す。なかなかそれらしい出来になっている 
でしよう。 


おわりに 


MML というと，既存の曲を入力してた 
だ聞〈だけという楽しみ方しかないように 
も思われがちです。しかし，乱数を使って 
「それらしい」曲を作り出していくことも結 
構面白い楽しみ方ではないでしょうか。今 
回は単純なコード進行と，連続する2音の 
関係のみを考慮して曲を作ってみましたが, 
もっと複雑なコード進行や メロディ の生成 
法を使うとか，特殊な音階を使うとか，い 
ろいろな工夫をすることで，本当に感動的 
な曲を作るのも夢ではないと思います。皆 
さん も いろいろ試してみません 力、 

さて，米月は AD PCM に挑戦してみたい 
と思います。なにが出るかお楽しみ（実は， 
まだな一んにも考えていない)。それでは， 
来月までさようなら。 
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1760 if (chosi =1 )and ( onkai{ n ) = 7 ) then s=‘_ + ” 

1770 r=nn(onkai ( n))+s+strS 《 1 1 

1780 if oku< >o!d_oku then r= M 0'* + str$ { oku) +r 

1 79(1 ol d_ oku=ok»J 

1 800 return( r) 

1810 endfun«* 

1820 /本 

1830 /* 技 さ 4 > K > 2 > 1 の楨 
1H4« /* 

1850 funr int nagasa( ) 

1 860 switch ransu( 4) 

1870 case 1:return ( 2 ) 

1 8B0 rase 2 : return(8) 

1890 default ： return(I) 

1900 endswitoh 

1910 endf unr* 

1920 /t 

1930 /* 商 さ差が 3 > 2 > 4 > 0 > 6 > 5 の | 貞 
1910 ハ 

1950 funo int takasat mae, c ； str ) 

1960 int i 

1970 switch ransut 6) 

1980 case 0 : i=4 : break 
1990 case 1:i =5 : break 
2000 case 2 : i=0 : break 

2010 case 3 : i=3 : break 

2020 case 4 : i=1 : break 
2030 default ： i=2 : break 
2040 endswi tch 

2050 if oku>4 then ( 

2060 if ransu2(2) then i= -i 

2070 \ else if oku<4 then { 

2080 if ransu2(2)=0 then i= -i 

2090 J else { 

2100 if int<rnd ( い then i= -i 

2110 ) 

2120 i = i+mae 

2130 if i<0 then { 

2140 oku=oku- 1 : i=i+7 

2150 Jelse if i>6 then! 

2160 oku=oku+ 1 : i=i-7 

2170 ) 

2180 if oku=0 then oku= 1 

2190 if oku=8 then oku=7 

2200 return( in_cod(i ,c) ) 

2210 endf unc 
2220 /* 

2230 /* コードの中の音 
2240 /» 

2250 func int in_cod(n, c ； s tr) 


2260 

int i , 

j,l 

k 





2270 

dim char 

cc(2) 





2280 

if c=" 

C" 

then 

1 

[cc(0)=0 

: cc(1)=2 : 

: cc(2)=4 

2290 

} else 

if 

c = ,, Dm H 

then 1 

1 cc(0)=1 

: cc(1)=3 : 

: cc(2)=5 

2300 

)else 

if 


then 1 

【 cc(0)=2 

: cc(1)=4 : 

: cc(2)=6 

2310 

)else 

if 

c = "F” 

then 1 

[cc(0)=3 

: cc( 1 ) =5 : 

: cc(2) =0 

2320 

} else 

if 

c="G” 

then i 

[cc(0)=4 

: cc( 1 ) =6 

: cc( 2 ) =1 

2330 

)e Lse 

if 

c="Ara” 

then 1 

[cc(0)=5 

: cc(1)=0 : 

: cc(2)=2 

2340 

} else 

if 

c="Bdim” 

then 1 

[cc(0)=6 

: cc( 1 ) =1 

: cc( 2 ) =3 

2350 

} else 



1 

[cc(0)=0 

: cc( 1 ) =2 : 

: cc(2) =4 

2360 

for i = 

：0 

to 2 






2370 if cc(i)=n then break 

2380 next 

2390 if i<3 then return(n) 

2400 if ransu(2)=0 then return 丨 n} 

2410 i=aba(n-cc(0)) : j=abs(n-cc(1)) : k=abs(n-cc(2)) 

2420 if i> j then i=j : j=cc( 1)else j=cc (0) 

2430 if i>k then return ( cc(2) ) else return ( j) 

2440 endfunc 
2450 /本 

2460 /* 乱数の 初期化 
2470 /t 

2480 func rnd_init() 

2490 str t : int h,m, s 
2500 t=time$ 

2510 h=val (lefts(t, 2 )) : m=va1(mid$(t f 4,2 ) ) : s = val{mid$( t,7 ,2)) 

2520 randomize ((h 本 m 本 s)and &H7FFF) 

2530 endfunc 
2540 /* 

2550 /* 残り ト ラック 
2560 /本 

2570 func int nokori(n) 

2580 int p=-1,i 

2590 for i = 1 to n : p=p and (m_free(i) > 50 ) : next 
2600 return(p) 

2610 endfunc 
2620 ハ 

2630 /* 乱数 （ 0 に 近い値ほど出に くい > 

2640 /本 

2650 func int ransu(n) 

2660 return( int(sqr(rnd <) )*n) ) 

2670 endfunc 

2680 /本 

2690 /* 乱数（そ® 2 > 

2700 /* 

2710 func int ransu2(n) 

2720 return( int(sqr(sqr(rnd()))*n)) 

2730 endfunc 
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AI 開発セツト/ 0S-9/XB 8000 
Sampling PRO-68K 

X 68000 あなたの知らない世界 


ビジネスショウで，ついに姿を現しだ os - 
9 /X 68000 。今回は X 68000 用マルチタスク 
OS とウィンドウシステム,そして待ちに待 
つた AD PCM 用ツール， Sampling PRO- 
68 K についての速報として製品概要を紹介 
していきます。 


AI 開発セツト 


今年のビジネスショウで発表された X 68 
000関係の新製品を紹介してみましょう。 
まずは， LISP ベースのエキスパートシス 
テム開発ツールです0このプログラムは S 
TAFF LISP というスタンダード LISP 系 
列の高機能 LISP で書かれています。最近 
は「〜系の LISP 」 というのははやりませ 
んが，ほとんど専用 LISP マシンと同等か 
それ以上の性能を示すという高性能ぶりが 
魅力です。日本では PC -9801 の 68000 ボー 
ド用に CP / M -68 K バージョンが発売されて 
いますが， 198,000 円とちょっと個人では 
手の出ない価格でした。 X 68000 版では安 
価に発売されることを祈りましょう。 

エキスパートシステム構築 ツールに よる 
サンプルとしてビジネスショウのデモでは 
マイクロマウスが画面上の迷路を解いてみ 
せたり，画面に表示されたハノイの塔を解 
いたりといった簡単なデモを実演していま 
した。 

数式％理システム REDUCE はメモリさえ 
積んでやれば大型機以上の性能を発揮する 
ことでしょう（広告によると MC 68000 と 
2 M バイ ト RAM で大型機並みだそうな）。 

こういった記号処理言語などではシステ 
ムの主記憶容量がそのまま性能に反映され 
てきます。その点では MC 68000 プロセッ 
サは向いているといえます。特に X 68000 
は主記憶最大 12 M バイトまで披張できます 
ので，その気になれば超本格的な処理が可 
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能です。ひと頃は 「 PC -9801 で REDUCE が 
とりあえず走る=凄い」といわれていたの 
ですから，時代も変わったものですね。 


◦ S -9/ XB 8000 登場 


昨年夏あたりから「秋葉原の某所では x 
68000で OS - 9が走っている」という噂が 
ひそかにささやかれていましたが，それが 
ついにシャープブランドで OS - 9 / X 68000 
として発売されることになりました（開発 
は マイクロウェア•ジャパン）。ビジネス 
ショウのシャープブー スでは 参考 出品な が 
ら，4台の マシンで OS - 9 が デモを行って 
いました。うち2台は アークネットと いう 
独自の インタフェイスでネットワークサー 
バに 接続されており， X 68000にもようや 
く ワークステーションと いった風情が出て 
きたようで'す。 

画面には PERSONAL WINDOW と呼べよ、 
れるマルチウインドウが展開され，その上 
で日本語 UNIFY (もとは UNIX 用のデー 
タベース）や DYNACALC といったビジネ 
スソフトが並行動作していました。なかな 
かの迫力です。 

OS -9 と Human 

OS - 9というものにあまり知識のない方 
が多いと思いますので簡単に解説してみま 
しょう。 OS - 9はマイクロウェア社が開発 
した68系の OS です。もとは MC 6809 用の0 
S だったのですが，現在では16ビット版の 
OS - 9/68000, 32ビット版の OS - 9/68020 
などが作られています。 

Human とは違う OS だからといって操作^ 
法や概念などがまったく異なるわけでもあ 
りません。 UNIX 以降-の OS はすべて UNIX 
の影響を受けているといわれるとおり， 
OS - 9も Human の元となった MS - DOS も U 
NIX を意識して開発されたものなのです。 
機能的に見ても階層化ディレクトリ，ユニ 
フアイド1/0，リダイレクト，パイプライ 
ン処理など， UNIX から受け継いだものに 


ついては MS-DOS ( Human 68 k ) とほぼ同 
じです。 

まず， Human とのフアイル互換性ですが， 
デイスクフ ォー マットが違いますのでその 
ままのかたちでは互換性はありません。し 
かし， OS - 9には MS - DOS , PC-DOSU 
BM PC のフォー マッ ト）のデイスタを読み 
書きするためのデバイスドライパ、が標準装 
備されるため， OS - 9上では特に問題はな 
いでしよう 0 ただし， Human のビジュアル 
シェルなどで OS - 9用のデイスクを使うと 
システムが フォー マットされていない デイ 
スタと判断して，フォーマットしようとし 
ますので注意が必要でしょう。これには H 
uman 用のデバイスドライバを変更するなど， 
メーカー側でなんらかの対処が望まれると 
ころです。 

マルチタスクの威力 

いちばんの違いは マルチ ユーザー， マル 
チタスクに対応しているかどうかというこ 
とです0たとえば， マルチ ューザーに対応 
しているため， OS - 9では コマンド 用のパ 
スとデータ用のパスが設定されており，各 
ューザーは自分に割り当てられたパスの中 
だけで作業するようになっています。 

システムの負担を最低限にしてマルチタ 
スタを実現するため， OS -9 上のフ。ログラ 
ムのほとんどがリロケータブル，リエント 
ラントに作られています。リロケータブル 
というのは「メモリ上のどこに置いても動 
作する」ということですが， OS -9 では実 
行時に新しいプログラムを組み込む（ダイ 
ナミックリンク）際のアドレス変換のオー 
バーヘッドをなくすため，最初からリロケ 
ータブルなプログラムのみを扱うようになっ 
ているわけです。 MC 68000ではリロケー 
タブルなプログラムを書くことはそう難し 
いことではありませんが，実行速度などで 
はやや不利となります。 

リエントラントとはいわば「複数のプロ 
グラムから使用できる」という意味です0 
たとえば， BASIC をマルチタスクで実行 
































マルチタスクの例 


DC '>* 



写真2 


する場合，ふつうは BASIC が実行される 
たびにディスクからプログラムがロードさ 
れるわけですが， 0 S - 9ではメモリ上にす 
でにそのプログラムがある場合は読み込み 
をキャンセルしてメモリ上のプログラムを 
そのまま使ってやろうというのです。その 
ためには，プログラムが使用するレジスタ 
やワークエリアはプログラム本体とは完全 
に分離して，呼び出したプログラム側でス 
タックなどを使って管理しなければなりま 
せん。アセンブラで開発する場合は少々注 
意が必要ですが， C や BASIC ， Pascal な 
どの高級言語を使用するときはコンハ。イラ 
が自動的にそのようなコードを生成してく 
れるので，ユーザーは特にリエントラント 
を気にする必要はありません。 

そして，こういった「作法」に従ったプ 
ログラム群が 0 S -9 を構成していくのです。 
もともと 0 S - 9のカーネルは非常に小さな 
ものです0これに，デバイスドライバ、，シ 
エル （ command , x にあたるもの〉，コマンド 
群などのモジュールがリンクされて一人前 
のシステムのできあがり。 OS -9 の世界で 
はモジュール化ということは本質的な意味 
を持ちます 。 MS OS /2 が涙ぐましい努力 
を重ねてマルチタスクを実現しているのに 
対し， OS - 9では最初からマルチタスク0 
S として設計されているため，非常にスッ 
キリしたシステム構成を保っています0 

マルチタスクによる恩恵はいろいろと考 
えられるでしょう。プリントアウト中にコ 
ンパイラやエディタが動けばそれなりに快 
適でしょう。ワープロやデータベースで夕 
スタ間のデータ通信ができればあっという 
間に統合化ソフトですし，ゲームなどでも 
威力を発揮しそうですね。 

また，口一カルエリアネットワークにも 
対応したシステムが用意される予定です。 

これはビジネスシヨウにも出展されていた 
アークネットによるものですが，転送レー 
卜は 2.5 Mbps という速度ですので，ネッ 
トワークを構築した場合の違和感もほとん 
どないでしょう。 UNIX のネットワークの 
場合，ひとつの大型機を中心に各 UNIX 端 




末からリモートログインして大型機をいじ 
める （？） という使い方が一般的ですが， 

この OS - 9ネットの場合はこれとは逆に各 
マシンを I / O として扱います。リモートログ 
インのようなことはできませんが，各端末 
に接続された周辺機器を自由に扱え，もち 
ろん端末間のデータ通信もできます。 

PERSONAL WINDOW 


X 68000 ユーザーには侍望のウィンドウ 
環境が提示されました。 X 68000 にはこれ 
までに， WINDEX ， Kamikaze ， VS . X など 
独自のウィンドウシステムを使ったソフ 
トウエアは登場していました力す，そういっ 
たウィンドウ環境がユーザーに対して開か 
れたことはありませんでした。メーカーか 
らもこういった環境についてなんの指導も 
なく，ある者はウィンドウドライバ制作を 
夢見たり，また，ある者は Macintosh をう 
らやむといった状況だったのです。 

PERSONAL WINDOW は UNIX !: で広 
く使われている X - WINDOW のコンセプト 
をベースにした専用のウィンドウシステム 
です。これでは， 1024 X 1024 の仮想画面を 

フルに使い，マウスカーソルで自由に表示 
エリアを指定することができます。このウ 
ィンドウは基本的にテキストベースのもの 
ですので，グラフィックには対応していま 
せん。しかし， X 68000 のテキスト VRAM 
はふつうの16ビット機のグラフィックに相 
当する能力を持ったビットマップ方式です 
ので，これだけでも相当の表現力を発揮で 
きるでしょう。 

ウインドウ操作にはパソコンでは初めて， 
マウスカーソルのある領域がアクティブウィ 
ンドウになるという「アクションリージョ 
ン」方式が採用されています。 WINDEX や 
VS . X などの Macintosh 式ウィンドウでは 
いちばん上に表示されているウィンドウが 
アクティブウィンドウ（ユーザーがアクセ 
スするウィンドウ）として扱われ，下敷き 
にな•っているウィンドウには飾り程度の役 
割しかなかったわけですが，マルチタスク 
で ©〈PERSONAL WINDOW ではアク 
ティブウィンドウ以外のウィンドウでもプ 
ログラムの実行動作を表示し続けます。ま 
た，ほかのウィンドウが半分かぶさっている 
ような状態でも，マウスカーソルがその領 
域にあれば，そのままキー入力が可能です。 

ちなみに，写真で画面上に開かれている 
ウィンドウの大きさは 80 X 25 字 (640 X 400 
ドット），ふつうの端末1画面分のものが 
余裕をもって並びます。画面写真のものは 
プロ トタイプですのでタイトルバ ー まわり 


にもスイツチ類は備えられていません力\ 
製品版ではもっと充実するとのこと。これ 
らの環境はすべてユーザーに開放されます。 

また，変わった機能として， X 68000 の 
4枚のテキストプレーンを4つの表示機器 
とみなして切り換えできるデバイスドライ 
バなどもサポートされるようです。こうな 
ると使い方に困ってしまいそうですね。 

言語•アプリケーション 


OS 9のひとつの目玉といえば ， BASI 
C 09でしょう。 BASIC 09 は構造化を強く意 
識した BASIC で，コンハ M ラ仕様となって 
います。 OS - 9はもともと BASIC 09 を 
かすために作られた OS だといわれますが， 
肝心の BASIC 09 は残念ながら付属してき 
ません。従米の OS -9/68000 用の BASIC 09 
(そのほかの言語も）はそのまま実行可能 
ですが，さらに X 68000 の機能をフルサボ 
一卜した専用版が現在開発されています。 

OS - 9用の C は UNIX の C に準拠したも 
のに専用ライブラリを加えたもので UNIX 
用のソースなら90%以上そのまま動作する 
らしいのですが，これも別売の予定となっ 
ています。 OS - 9には標準で MAKE が装備 

されているほか， C にはソースレベルデバツ 
ガがついていますので開発環境としては， 
Human 以上といえるかもしれません。 MS - 
DOS の C からは XC に， UNIX の C からは 
OS - 9の C にと使い分ければ X 68000 のソ 
フトウエア資産も急増しそうですね。 

また，懸念された卩本語処理関係はほぼ 
Human とコンパチのものとなる予定。標準 
装備されるフロントプロセツサは, ASK .68 
K を OS -9 用にリロケータ ブル/リエン トラ 
ントにしたもので，若干高速化されている 
とのこと。 X 68000 独自のソフトウヱアと 
しては AV RIDER という， FM 音源 ， AD 
PCM ， グラフィツク機能を統合的に扱うシ 
エルのようなものが予定されています。 

OS - 9自体の発売時期はまだはっきり決 
まっていませんが，秋頃には登場するはず 
です（価格については未確認情報ですが3 
万円を切るのではないかとの噂も。ちなみ 
に OS /2 は R 70 用で58,000円)。 

最後に 

さて，写真3を見てください。これがビ 
ジネスショウでも展示され，意味不明とい 
われた OS - 9のデモです。宇宙を飛ぶ戦關 
機 （？） のスクリーンに映った映像が次第 
に拡大されていくというもので，ちょっと 
見た目には Human でも簡単にできそうなデ 
モなのですが，これにはひとつの主張が込 
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められています。というのも，これらはす 
ベて 0 S - 9の フアンクシ ヨ ン コールの みを 
使ったデモなのです。 

X 68000 用に現在発表され ているゲーム 
などのアプリケーションのほとんどは Hum 
an の フアンクシヨン コールや IOCS を 無視 
して，直接 VRAM などの I/O を操作するな 
どの高速化がなされています。無論，リエ 
ントラントに書かれたものなどは存在しな 
いでしよう。これでは将来 X 68000 の 32 ビッ 
卜版が発売されても 「スペースハリアーが 
ウィンドウで動く」といったことは到底望 
めそうもありません。 

一般に OS -9 の世界では，このようにア 
プリケー シヨンがデバイスドライバ、 や ファ 
ンクション コールを とおさずに I / O に触れ 
ることは許されていません。あの宇宙船の 
デ、モは OS - 9 のフアンクシヨン コー ル だけ 
でも，これだけのことができるというデモ 
だった はずなのです が……。 

ふつうの ユーザーがコンピュー タを使用 
する際には，マルチタスクよりもシングル 
タスタで使うことのほうが多いのは事実で 
しよう。実際，これまでのパソコンはシン 
グルタスクでも用が足りていたことを思え 
ば，これまでの Human でもたいていのこと 
では闲ることはありません。しかし，マル 
チタスクが導入されることでまた新しいコ 
ンピューティングの世界が開けてくること 
でしよう。 

たた；気をつけてほしいのは OS -9 と H 
uman を比べた場合，単純に マルチ タスク だ 
から OS - 9が優れているというわけではな 
いということです。 MSDOSV 2.2 に比べ 
れば Human は動作の安定性など，非常に優 
れた 向 も あり， そもそも シングルユーザー/ 
シングル タスクを目す旨したもの と，マルチユ 
ー ザ ー/マルチ タスクを目指したものとでは 
設計思想が根本的に異なるのです。 

とにかく，これで X 68000 に Human 68 k ， 
CP / M -68 K ， OS - 9/68000と3種類の OS 
が揃いました。どれを選ぶかはューザー次 
第。なかなか楽しくなってきましたね（さ 
あて，次は UNIX だ)。 
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Sampling PRO-6BK 


SOUND PRO -68 K，MUSIC PRO -68 
K に続く，シャープブランドの音楽ソフト 
がこの Sampling PRO -68 K です。前2作が 
FM 音源用のユーティリティだったのに対 
して，このソフトは X 68000の AD PCM を 
最大限に活用しようというコンセブトで開 
発されています。 

楽器でサンプリングというとカシオのサ 
ンプルトーンやフェアライト CMI が有名で 
す力、 X 68000 に使用されている PCM 用の 
チップはこういった音楽用に開発されたも 
のではなく，どちらかといえば留守番電話 
などに向いた石で'す。まず，サンプリング 
は4ビットの固定長デルタ PCM ですのでそ 
れほどの音質は望めません。加えて，ハー 
ドウェァ自体には周波数変調の機能がない 
ので，音楽として使う場合にはソフトウェ 
アの負担が非常に大きなものとなります。 

しかし，それでもなおサンプリング音源 
は従来の F M 音源や S S G では不可能だった 
表現を可能にします。「誰も聞いたことの 
ない音を作りたい」というのがシンセサイ 
ザの原点であるならば，「音=空気の振動」 
をもっとも明確に提示してくれる PCM 方式 
が秘めた可能性を見逃すわけにはいかない 
1 T し上ラ 〇 

この Sampling PRO -68 K では，サンプル 
した音を全/半角1文字の ラベル 名で管理し 
ます。一般的には“あ”から“ん”までの 
50音などをそのまま1音ずつ登録してお 
いてしゃべらせる，といった用途が多いで 
しょう0ひとつのファイルは最大で約7 00 
K バイト，300 ラベル （約200秒）まで登録 
できます。もちろん，ひとつの ラベルに長 
いデータを入れてもかまいません。 

どうしても楽器として使いたいという方 
は使用する キー すべてにラベルをつけると 
いう荒技もできます0シンセでもマルチサ 
ンプリングは常識なのだから，手持ちの楽 
器から1音ずつ音を録るのもよいでしょう。 
これなら，実用になる音が出ます。 

基本的な使い方 

では順を追って Sampling PRO -68 K の使 
い方を見てみましょう。まず，データのサ 
ンプリングを行います。これには BASIC 
などと同様そのままの音を取るモードと音 
量があるレベルに達したら自動的に取り込 
みを開始するトリガーモードがあります。 
無論，トリガュレベルは簡単に設定可能で 
すし，最近のサンプリングキーボードで見 



写真4範囲指定して演奏 

られるスタートオフセット機能も設定でき 
ます。これはトリガーモードで立ち上がり 
途中の音が頭切れになってしまうのを防ぐ 
ため，トリガーレベルに達する前の状態を 
一定間隔で保存する機能です。 

ラベル 名を指定してサンプリングを行っ 
たら，その音を編集してみましょう。まず， 
プルダウンメニューで全体の波形を表示さ 
せ，エディットしたいあたりをタリックし 
てみます。するとエディット用のウィンド 
ウにその部分が詳しく再表示されます。こ 
こで波形のインサート/デリート，振幅調 
整，波形合成，手書き修正などの操作が可能 
です。修正されたデータは画面上のミュー 
ジック キーボードまたは実際のキーボード 
(コンピュータの）で音程を変えて演奏し， 
耳で確認することもできます（音程によっ 
てはノイズっぽくなる）。この場合，一定 
範囲だけを演奏する，一定範囲を繰り返し 
演奏するといった操作により，適当な区間 
を選んでやれば，きわめて短いデータでそ 
の音色を表現できるわけです（うまくいけ 
ば ）0 


そのほかの機能 


このようにして作られたサウンドデータ 
は BASIC や MUSIC PRO -68 K で作られた 
音楽データとリンクしたり，目覚まし時計 
のようにタイマーセットで起動すること力 ？ 
できます。また，ユーティリティとして0 
S や BASIC の エラー 番号に応じて エラー 内 
容を音声出力するための ツール や，キー入 
力やリスト出力を読み上げてくれる ツール 
が 付属します0この ツールで 作ったデータ 
は OS レベルで 使用できるわけです0 

ディスクは2枚組で1枚はシステム，もう 
1枚はデータディスクとなっています。自 
分の声を再生してもちょっと不気味だとい 
う人は付属の音声データを使用しましょう。 
若くて美しい（そう信じよう）女性の声が 
登録されています（モーニングコールのデ 
ータも入っているぞ）。発売予定は7月初め。 
君の X 68000 が歌い出す日も近い！ 

(中野修一） 












































Object oriented 


実用 (？) オブジェクト指向のゲームプログラミング 


第7回 


Hamaguchi Isamu 

浜口勇 

さて，今月でプログラムのほうは一応動 
くようになった。これで，まったく使いも 
のにならないということもないということ 
になる（やれやれ）。 

最終的には全体的に変更しなければなら 
ない部分が出てきたので全部のリストをリ 
スト1に掲敝しよう。プログラム全体の構 
成は今まで説明したのと変わっていないの 
でそちらを参照してもらうことにして，今 
冋はあまり細かいことをグチグチ書いてい 
っても理解できなくなる可能性があるので 
できるだけわかりやすい話題を中心に取り 
上げていってみよう。 

さて，ここで連載初回からの疑問をもう 
一度ぶり返すことになる。 

「オブジェクト指向というのは何なの力、 
それは容易に実•現できるのか。本当に役に 
立つのか」 

この3つの疑問に対する解答というのは 
果たして発見できたのか？ 


取 f 刃の:7 ■—V 


まずオブジェクト指向というのは何なの 
か？という疑問であるが，答えは「デー 
夕とプログラムをまとめて扱うことによっ 
てシステムを抽象化する試み」などという 
言葉でぉ茶を濁したほうが賢明なようだ。 
なぜなら，オブジェクト指向にとって絶対 
神ともいえた Smalltalk がその権威を失いつ 
つあるためにその定義も混沌の中に落ち込 
みつつあるからだ。 

たとえばクラスの問題というのがあって， 
「クラスというのは特別なインスタンス（つ 
まりオブジェクト）なのでインスタンスさ 
えあればクラスは不要である」という意見 
があるようである。普通のインスタンスと 
クラスといった場合分けがあるのはシステ 
ムを複雑化するだけだからやめたほうがい 
いというわけだ。 

では今回のシステムになぜクラスがある 
のかというと，実は ROM 化といった問題が 


完結のスネークオブジェクト 


大胆にも Z 80 でオブジェクト指向による 1 J アルタイムゲームのプロ 
ヴラミングをとい*5試みで始まつだ連載だが，苦闘の末よろや<プ 
□グラムを走らせるところまでこぎつけることができたようだ。今 
回と次回で完成したプ□ヴラムを発表することにしだい。 


残されているからである。たとえばあるプ 
ログラムを ROM 化しようとした場合，その 
プログラムの中には当然 ROM の上に乗って 
いる部分と RAM の卜」二ある部分が出てくる 
( Ml )。 ROM は書き換えができないから R 
OM の上にあるデータというのは変数では 
なく定数ということになるわけた 

さて，もしもインスタンスだけしかない 
システムの場合 ROM の上にある変数と RAM 
の上にある変数という2つの状態が混在し 
てわかりにくい。しかしクラスがあるなら 
ばクラスの変数というのはすベて ROM の上 
にあって書き換えができないということに 
してしまえばいいので簡単である。このよ 
うにある状況ではクラスというのは大変有 
用なのだ。 

ではなぜクラスは必要ないという論議が 
出るかというと研究者はプログラムを ROM 
化したりしないということなのだろう。つ 
まりそれぞれの分野によって必要とされて 
いるオブジェクト指向が違うのである。 


オブジェクト指向の可能性 


次に2番目の答えは簡単である。実現で 
きる。この記事の後ろに実例が載っている。 
ただしプログラム中によい例とはいえない 
部分が多く見られるのも事実だ。 

shead や backg などのプログラム中には定 
数の使用が結構兇られるのだけど，これは 
できればクラス変数にすべきだろう。なぜ 
クラス変数になっていないかというと ， Z 
80という CPU の特質により，クラス変数に 
アクセスするのがとても面倒なためた 、 sh 
ead や backg は他のクラスの スーパー クラス 
にはなっていないために今回は特にクラス 
変数を使う必要はなく，デバッグの容易さ 
からクラス変数はあまり使わなかった。 

本当に役に立つのかという疑問に対して 
は，「少なくともビデオゲームプログラミン 
グというジャンルにおいてはかなりの意味 
を持つ可能性がある」と答えたい。高級言 


語や練された命令体系を持った CPU とは 
結構相性がよいようである。 

では Z 80とは？ と聞かれるとかなり苦 
しいものがある。変数を操作するのに手問 
がかかり過ぎ，プロダラムが的:観的でなく 
なるためバグが発牛.しやすく なるのである。 
今回のプログラムも 2 K バイトないのにバグ 
のオンパレードであった。じや Z 80 は使い 
ものにならないのか，というとそんなこと 
はない。萵級 rf 語を使えばよいのだ。最近 
の高級言語は素晴しいコードを出してくれ 
るのでかなり開発は容易になる。 

僕個人としては，「使いものにならない！」 
と力説されても細 i かいところでチョコチョ 
コと使っているので，「でも一応使っている 
んですけど」と反論するしかない。この連 
載も C なんかを対象にするとかなりわかり 
やすくなったかもしれないが，なにしろ C 
ユーザーなど数えるほどしかいないという 
ことでその線はあきらめざるをえなかった 
というところだ。 

さて，最後にプログラムも揃ったという 
ことでリストの アセンブルの しかたについ 
て説明しておこう。まず classm があるなら 
ば，それを使う，なければ .def リストを- 
生懸命入力する。今回の記事だけならば .def 
ファイルを入力したほうが早いだろう。 

次に .mac ファイル等を入力する。この場 
合すべてのファイルと M 80 は M 80 のバグの 
ために（インクルードに閲するバグ）同ード 
ライブ上に揃っていなければならない。 

そして取後に runtime . 図 1 rqm 化した場 
rel が： t 頭にくるように 合のプログラム 構成 
リンクすればよい。面 
倒臭いのでまとめてリ 
スト2に載せておく。 

次号は少し落ち着く 
ので最後として，ダン 
ブリストの掲載と今ま 
でのおさらい， C への 
拡張などやるつもりな 
のでよろしく。 
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ij ストト 4 -b object.mac 


object: : dw 
dw 
dw 


=== object.mac ========== 

include CLASS.DEF 
include OBJECT.DEF 


metaclass 
instancemethod 
ivarsize 


Id 

Id 

inc 

hi,(wtop##) 

e,(hl) 

hi 

Id 

d,(hl) 

dec 

hi 

Id 

ex 

(wtop##),de 
de，hl 

ret 


selfailoc 

ex 

de,hl 

Id 

(hl),c 

inc 

hi 

Id 

(hi),b 

dec 

hi 

ex 

de,hl 

ret 


Id 

h f b 

Id 

1 »c 

Id 

de,(wtop##) 

Id 

Id 

(wtop##),hi 
(hi),e 

inc 

hi 

Id 

(hl) f d 


freeobj : ©selffree 
ret 
end 


リスト 1-5 -a acter.def 


: = = = ==== === acter.def ==== = ■ 
; meta class 

raetaclass : 

dw metaclass 

dw classMethod 

； class var 


mclass def1 
imethod def1 
roemsiz def1 
cvarsize 


4 

equ 


_selfnew macro 

selfclass 0 

endm 

_aelfalloc macro 

aelfclass 2 

endm 

_supernew macro 

call ^0001## 

endm 

_superalloc macro 

call @©0000## 

endm 

_acternew macro 

callclass 0 

endm 

_acteralloc macro 

callclass 2 

endm 

classMethod ： 

保 90011 equ new 

public 後 ®0011 

⑽ 001 1 
d«0OO0## 


dw 

dw 


instance var 


class def1 
linkup def1 
linkdw def1 
ivarsize 

fiselffreeobj 


0 

2 

4 

equ 

macro 


endm 

0selffree macro 

seifinstance 
endm 

®aelfnextobj macro 

selfinstance 
endm 

fiselflink macro 

selfinstance 
endm 

©selfdemon macro 

selfinstance 
endm 

©auperfreeobj macro 

call @@0003 

endm 

dsuperf ree macro 

call ®»0002 

endm 

dacterfreeobj macro 

callinstance 
endm 

分 acterfree macro 

callinstance 
endm 

@acternextobj macro 


42: public 000003 

43 ： M0002 equ free 

44: public M0002 

45 ： dw 090003 

46 ： dw M0002 


callclass 

endm 

_3creenalloc macro 

callclass 
endm 

_joypotnew macro 

callclass 
endm 

_joypotalloc macro 

caliclass 
endm 
classMethod: 

； instance var 

ivarsize equ 


ebackgfreeobj macro 

callinstance 
endm 

dbackgfree macro 

callinstance 
endm 

dbackgnextobj macro 
callinstance 
endm 

dbackglink macro 

callinstance 
endm 

Obackgderoon macro 

callinstance 
endm 

dbackgatcheck macro 
callinstance 
endm 

@screenfreeobj macro 
callinstance 
endm 

©screenfree macro 

callinstance 
endm 

^screenbox macro 

callinstance 
endm 

dacreenputc macro 

callinstance 
endm 

djoypotfreeobj macro 
callinstance 
endm 

®joypotf ree macro 

callinstance 
endm 

®joypotinp macro 

callinstance 
endm 

instanceMethod: 


リスト 1-3 -b start.mac 


=== start.mac ===== 
include CLASS•DEF 
include START.DEF 

Id be,screen## 

_screennew 
Id be,joypot## 

_joypotnew 
Id bc,backg## 

backgnew 

Id bc r bwork## 

❺ backgdemon 

ret 

end 


ij スト 1-4 -a object.def 


: = = = = = = ==== object.def = = = = 
; meta class 

metaclass : 

dw metaciass 

dw classMethod 

; class var 


8 

mclass 

defl 

0 


9 

imethod 

defl 

2 


10 

memsiz 

defl 

4 


11 

cvarsize 

equ 

6 

12 





13 

__selfnev 


macro 


14 


selfclaas 

0 

15 


endm 



16 

selfailoc 

macro 


17 


selfciass 

2 

18 


endm 



19 





20 

classMethod : 



21 

d 90001 

equ 

new 


22 


public 

柳 0001 


23 

⑽ 0000 

equ 

alloc 


24 


public 

990000 


25 


dw 

dw 

000001 


26 


990000 


27 





28 

; 

instance var 


29 





30 

class 

defl 

0 


31 

ivarsize 

equ 

2 

32 





33 

後 selffreeobj 

macro 


34 


selfins 

tance 

0 

35 


endm 



36 

®aelffree 

macro 


37 


self ma 

tance 

2 

38 


endm 




instanceMethod : 

9^0003 equ freeobj 


リスト 1-1 class.def 


1 

aelfclass 

macro arg 

2 


Id 

hi f arg 

3 


call 

_call## 

4 


endm 


5 




6 

selfina 

^ance 

macro arg 

7 


Id 

hi,arg 

8 


call 

_call## 

9 


endm 


10 




11 

callclass 

macro arg 

12 

13 


Id 

call 

hi 9 arg 
_call## 

14 


endm 


15 




16 

callinstance 

macro arg 

17 


Id 

hi,arg 

18 


call 

_call## 

19 


endm 


20 




リスト 1-2 runtlme.mac 

1 


.Z80 


2 


dseg 


3 

wtop： : 

ds 

2 

4 

work : 

ds 

32 本 1024 

5 


cseg 


6 

main®: : 



7 


di 


8 


Id 

d,00 

9 


Id 

e,18 

hi,screentable 

10 


Id 

11 

scloop: 



12 


Id 

be,180Oh 

13 


out 

(c) ,d 

14 


inc 

be 

15 


Id 

a,(hi) 

16 


out 

(c) ,a 

17 


inc 

hi 

18 


inc 

d 

19 


dec 

e 

20 


JP 

nz,scloop 

21 




22 


Id 

Id 

be,la03h 

23 


a,0dh 

24 


out 

(c) ,a 

25 




26 


Id 

de,work 

27 


Id 

(wtop),de 

28 


Id 

be,1024 

29 

wloop: 



30 


Id 

hi,32 

31 


add 

hi ,de 

32 


ex 

Id 

de,hl 

33 


(hl),e 

34 


inc 

hi 

35 


Id 

(hl),d 

36 


dec 

be 

37 


Id 

a, b 

38 


or 

c 

39 


jp 

nz,wloop 

40 




41 


JP 

start## 

42 




43 

_call:: 



44 

45 

46 


push 

push 

Id 

de 

hi 

h,b 

47 

48 


Id 

Id 

l,c 

e,(hi) 

49 


inc 

hi 

50 


Id 

d f (hi) 

51 


inc 

de 

52 


inc 

de 

53 


ex 

Id 

de,hl 

54 


e f (hi) 

55 


inc 

hi 

56 


Id 

d f (hi) 
hi 

57 


pop 

58 


add 

hl,de 

59 


Id 

e, (hi) 

60 


inc 

hi 

61 


Id 

ex 

d f (hi) 

62 


de,hl 

63 


pop 

de 

64 


JP 

(hi) 

65 




66 


.radix 

16 

67 

screentable : 


68 


db 

37,28 ,2d,34,If ,02,19,: 
00,07,00,00,00,00,00,1 
00,00 

69: 

70 ： 

end 



リスト 1-3 

-a start.def 

1 


meta class 

2 

metac 丄 ass : 


3 


dw 

metaciass 

4 


dw 

classMethod 

5 




6 

； 

class var 


一 backgnew macro 

callclass 
endm 

_backgalloc macro 

callclass 
endm 
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hl’holdhk 
hi f be 
be 

o,(hl) 

hi 

b f (hi) 


z.qrtfree 


©acternextobj 
push de 

^acterfreeobj 
pop be 

jp freeloop 

qrtfree : 

pop be 

©auperfreeobj 

ret 

end 


include 

CLASS.DEF 

include 

HOLDER.DEF 

:: dv 

metaclass 

dw 

dw 

instancemethod 

ivaraize 

_supernew 

Id 

hi,holdhk 

add 

hi,de 

xor 

a 

Id 

(hl) t a 

inc 

hi 

Id 

(hi),a 

ret 


Id 

hi,holdhk 

add 

hi, be 

push 

be 

Id 

inc 

c f (hi) 
hi 

Id 

b,(hl) 

Id 

a,c 

or 

b 

JP 

z,nuilend 

1: 

pop 

be 


©superdemon 

ret 


new: _supe 

Id 

add 

xor 

id 

inc 

Id 

Id 

add 

Id 

inc 

Id 

ret 

demon: Id 

add 


push 

Id 

inc 

Id 

Id 

or 

JP 


add 

Id 

inc 

Id 


2 

3 


6 

7 

8 
9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 
21 
22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 



リストト 7 -a 

acheck.def 

1 

； meta class 

2 

metaclass : 


3 

dw 

metaclass 

4 

dw 

clasaMethod 

6 

； class 

var 

8 

rociass defl 

0 

9 

imethod defl 

2 

10 

memaiz defl 

4 

11 

evarsize 

equ 6 

12 


13 

_selfnew 

macro 

ass 0 

14 

selfcl 

15 

endm 


16 

selfalloc 

macro 

17 

seifcla88 2 

18 

endm 


19 



20 

_aupernew 

macro 

21 

call 

W0016## 

22 

endm 


23 

superalloc 

macro 

24 

call 

@90000## 

25 

endm 


26 

_achecknew 

macro 

27 

callclass 洛 

28 

endm 


29 

acheckalloc 

macro 

30 

callclass 2 

31 

endm 


32 

classNethod: 


33 

dw 

dw 

^0016## 

34 

990000## 

35 



36 

; instance var 

37 



38 

class defl 

0 

39 

linkup defl 
linkdw defl 

2 

40 

4 

41 

holdhk defl 

6 

42 

ivarsize 

equ 8 

43 


44 

©selffreeobj 

macro 

45 

self in! 

stance 0 


エクト指向のゲームプログラミング 


hi f linkdw 
hl f bc 
e f (hi) 
hi 

d,(hl) 


a,e 

d 

z 9 qrtfreeooj 

hi,linkup 

hl,de 

hi 


rnew 

hi,linkup 

hl,de 

a 

(hi) 9 a 
hi 

(hi),a 
hi,linkdw 
hl f de 
(hl),a 
hi 

(hi),a 


hi,linkdw 
hi, be 
be 

c,(hl) 

hi 

b,(hl) 

a,c 

b 

z 9 nullend 


hi y linkup 
hi, be 
(hl) t e 
hi 

(hl),d 

de f hl 

e,(hl) 

(hl),c 

hi 

d,(hl) 

(hl) t b 


hl.be 

(hl),e 

hi 

(hl),d 

a,e 

z 9 qrtlink 

hi 9 linkup 
hi,de 
(hl) f c 
hi 

(hl) f b 


hi,linkdw 
hi, be 
e,<hl) 
hi 

d, (hl) 
de 

hi f linkup 
hi, be 

e, (hl) 
hi 

d,(hi) 
de 9 hl 
hi 

e f (hi) 
hi 

d,(hl) 

de 9 hl 

a 

hi, be 
hi 

z,Itop 

de 9 linkdw 
hl # de 

de 

(hl) f e 

hi 


リス M-6 -a holder.def 


=========== holder.def ==== 

； meta class 

metaclass : 

dw metaclass 

dw classMethod 

； class var 


rociass def1 
imethod def1 
merosiz def1 
evarsize 


2 

4 

equ 


_selfnew macro 

selfclass 0 

endm 

_selfalloc macro 

selfclass 2 

endm 

_supernew macro 

call @@0011## 

endm 

_auperalloc macro 

call d 後 0000## 

endm 

_acternew macro 

callolass 0 

endm 

_acteralloc macro 

callclass 2 

endm 

classNethod ： 

桃 0016 equ new 

public ^@0016 

⑽ 0016 
@@0000## 


dw 

dw 


instance var 


class def1 
linkup def1 
linkdw def1 
holdhk defl 
ivaraize 


6 

equ 


©selffreeobj macro 

selfinstance 
endm 

dselffree macro 

selfinstance 
endm 

dselfnextobj macro 

seifinstance 
endm 

dselflink macro 

selfinstance 
endm 

(dse lfdemon macro 

selfinstance 
endm 


macro 

@90013## 


dsuperfreeobj 

call 

endm 

dauperfree 

call 

endm 

dsupernextobj 

call 

endm 


call 

endm 

dsuperdemon macro 

call 桃 0012 

endm 

dacterfreeobj macro 

call instance 
endm 

©acterfree macro 

call instance 
endm 

^acternextobj macro 

cal1instance 
endm 

©acterlink macro 


100 

101 


callmstance 

endm 

袋 aoterdemon macro 

callinstance 
endm 


instanceMethod : 


MOO18 

equ 

f reeobj 


public 

^@0018 

^0017 

equ 

public 

dw 

demon 
抑 0017 
桃 0018 


dw 



dw 

©©0015## 


dw 

@@ 〇 014«« 


dw 

@90017 


■J スト 1-6 -b holder.mac 


Id 

hi,linkup 

add 

hi,bo 

Id 

e,(hi) 

inc 

hi 

Id 

d f (hi) 

pop 

hi 

Id 

(hl),e 

ino 

hi 

Id 

(hl),d 


qrtfreeobj : 

Osuperfreeobj 
ret 


Id (hi) f d 


8 

9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 
21 
22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 

59 

60 
61 
62 

63 

64 

65 

66 

67 

68 

69 

70 

71 

72 

73 

74 

75 

76 

77 

78 

79 

80 
81 
82 

83 

84 

85 

86 

87 

88 

89 

90 

91 

92 

93 

94 

95 

96 

97 


21 


callinstance 

endm 

dacterlmk macro 

callinstance 
endm 

dacterdemon macro 

callinstance 
endm 

instanceMethod : 
ddO015 equ nextobj 

public 
¢100014 equ 

public 
抑 0013 equ 

public 
M0O12 equ 

public 
dw 
dw 
dw 
dw 


dw 


9d0O15 

link 

«dO014 

freeobj 

090013 

demon 

M0O12 

M0013 

M 抑❶ 2## 

••0015 

M0014 

M0012 


U スト 1-5 -b acter.mac 


========== acter.mac ======== 

include CLASS-DEF 
include ACTER.DEF 
acter:: dw metaclass 

dw instancemethod 

dw ivarsize 


100 

101 

102 

103 

104 

105 

106 

107 

108 

109 

110 
111 
112 

113 

114 

115 

116 

117 

118 

119 

120 
121 
122 

123 

124 

125 

126 

127 

128 

129 

130 


▲ SHIFT BREAK を読んだが， U 氏の問いに 2 つしか答えられない自分が悲しい。変身忍 
者嵐の愛馬はハヤブサオーだ。バトルホークの必殺技は，敝刃旋風斬り，変幻風刃投げ秘 
投三方刃である。 斎藤正 (18 ) 埼玉県 


実用 （？ 


d 8 C 

ddudnd d r p 
X 8 oj 


xsll xd 3 add 3 irssjp 3131 Id ret^ ld inc ld pua ldaddldillcldex lm ld :idaborp p ldadd l3 J 



d c t d 
d d d n d e n 
lal i 1 r e 


d 8 

d r p d d u 
10 j lap 

















BOTOM 
p,aton 
dsuperatoheck 
ret 


jp p 


Id 

Id 

ret 


a.Offh 
(atflag##) t a 


ret 

end 


リスト 1-8 -b backg.mac 

============ backg.mac ===r=rr=r= 



include 

CLASS.DEF 


include 

BACKG.DEF 

LEFT 

EQU 

01 

RIGHT 

EQU 

39 

TOP 

EQU 

01 

BOTOM 

EQU 

dseg 

24 

bwork :: 

ds 

cseg 

ivarsize 

backg: : 

dw 

metaclass 


dw 

instanceroethod 


dw 

ivarsize 


db 

1 

alloc: 

Id 

de,bwork 


ret 


new : 

_supernew 
push de 


push 

push 

Id 

dscrocnl 

be 

be 

be t sworkt# 


pop 

Id 

be 

hi,pnumb 


add 

hi,be 


Id 

a,(hi) 

newloop: 



push 

Id 

af 

(un##),a 


Id 

be v ahead## 


8headmakep 


Id 

Id 

b, d 

c, e 


Id 

de.bworkfholdhk 


dsheadlink 


pop 

and 

af 

a 


JP 

dec 

z 9 qrtnew 
a 


jP 

newloop 

qrtnew ： 

pop 

pop 

be 

de 


ret 


demon: 

Id 

hi ,20000 

dloop: 

dec 

hi 


Id 

or 

a，l 

h 


JP 

nz 9 dloop 


#8uperd< 

Id 

?mon 

hi,holdhk 


add 

hi, be 


Id 

e f (hl) 


inc 

hi 


Id 

d f (hl) 


Id 

a,e 


or 

d 


JP 

nz 9 demon 


ret 


atcheck : 



Id 

Id 

de,(atobj##) 
hi»xpoint 


add 

hl t de 


Id 

a,(hi) 


LEFT 

m,aton 


2 

3 

4 

5 

6 

7 

8 
9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 
21 
22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 

59 

60 
61 
62 

63 

64 

65 

66 

67 

68 

69 

70 

71 

72 

73 

74 

75 

76 

77 

78 

79 

80 
81 
82 

83 

84 

85 

86 

87 

88 

89 

90 

91 


リスト 1-9 -a snakep.def 


: =r = = = === = = snakep.def = ===• 
; meta class 

metaclasa : 

dw metaclass 

dw classMethod 

; class var 

mclass defl 0 

imethod defl 2 

memsiz defl 4 

cvar8ize 


equ 


^selfnew macro 

selfolass 
endm 

^selfalloc macro 

selfclass 
endn 

^selfmakep macro 

selfclass 
endm 

^supernew macro 

call ^0016 

endm 


120 

121 

122 

123 

125 

126 

127 

128 

129 

130 

131 

132 

133 

134 

135 

136 

137 

1 :川 

139 

140 

141 

142 
1 - 13 

144 

145 

146 


一 superalloc macro 

call M0000## 

endm 

_aheadnew macro 

callclass 0 

endm 

_sheadalloc macro 

callclass 2 

endm 

_sheadmakep macro 

callclass 4 

endm 

_screennew macro 

callolaas 0 

endm 

__Bcreenalloc macro 

callclass 2 

endm 

classMethod: 

^0031 equ new 

public 场场 0031 

«©O03O equ alloc 

public d 场 0030 
dw 900031 

dw 抑 0030 

； instance var 


class defl 
linkup defl 
linkdw defl 
holdhk defl 
aetp defl 
xpoint defl 
ypoint defl 
ivarsiz© 


2 

4 

6 

8 

9 

10 
equ 


11 


daelffreeobj macro 

selfinstance 0 

endm 

®aelffree macro 

selfinstance 2 

endm 

9seifnextobj macro 

selfinstance 4 

endm 

dselflink macro 

selfinstance 6 

endm 

dseifdemon macro 

selfinstance 8 

endm 

^selfatcheck macro 

selfinstance 10 


78 

endm 


79 



80 

dsuperfreeobj 

macro 

81 

call 

M0018** 

82 

endm 


83 

9auperfree 

macro 

84 

call 

柳 002#* 

85 

endm 


86 

dsupernextobj 

macro 

87 

call 

M0015M 

88 

endm 


89 

ttsuperlink 

macro 

90 

call 

抑 0014*# 

91 

endm 


92 

dsuperdemon 

macro 

93 

call 

W 00170 

94 

endm 


96 

dsuperatcheck 

call 

macro 

• 刪 19#* 

97 

endm 


98 

^sheadfreeobj 

macro 


callini 

stance ( 

100 

endm 


101 

❹ aheadfree 

macro 

102 

callinstance 

103 

endm 


104 

9sheadnextobj 

macro 

105 

callinstance ‘ 

ior> 

endm 


107 

daheadlink 

macro 

108 

callini 

stance 1 

109 

endm 


110 

dsheaddemon 

macro 

111 

callinstance 1 

112 

endm 


113 

dsheadatcheck 

macro 

114 

callinstance 

115 

endm 


116 

Osheadcleara 

macro 

117 

callinstance 

118 

endm 


119 

dsheadshows 

macro 


callinstance 

endm 

0screenfreeobj macro 
callinstance 
endm 

#acreenf ree macro 

callinstance 
endm 

9acreenbox macro 

callinstance 
endm 

⑯ screenputc macro 

callinstance 
endm 

instanceMethod : 

000034 equ atcheck 


public 
900033 equ 

public 
M0O32 equ 

public 

dw 

dw 

dw 

dw 

dw 

dw 


M0034 

free 

M0033 

denon 

M0032 

M0018## 

090033 

M0015#* 

籲鴯 0014## 

M0O32 

M0034 


▲ マンハッタン.レクイエム も殺意の接吻も桃太郎伝説も解いた。ゼビウスもグラディウ 
スも スペースハリアー も ツインビー も究極までいった。いま，源平•け魔伝の信濃の三つ首 
能が倒せなくていきづまっている。お一い，助けてくれよ一。荒井稚利 (20 ) 石川坩 


endm 

®selffree macro 

selfinstance 
endm 

鍮 seifnextobj macro 

selfinstance 
endn 

dselflink macro 

selfinstance 
endm 

daelfdemon macro 

selfinstance 
endm 

0selfatcheck macro 

seifin8tance 
endm 


^superfreeobj 
call 
endm 

dsuperfree 

call 

endm 

Oaupernextobj 

call 

endm 


macro 

M0015** 


macro 
⑽ 0017*# 


call 
endm 

•superdemon 
call 
endm 

dacheckfreeobj macro 
oallinatance 
endm 

鍮 acheckfree macro 

callinstance 
endm 

•achecknextobj macro 
callinstance 
endm 

dachecklink macro 

callinstance 
endm 

dacheckdemon macro 
oaliinstance 
endm 

嫌 acheckatoheck macro 
callinstance 


95 

endm 


96 

instanceMethod: 


97 

MO019 equ 

atcheck 

98 

99 

public 

dw 

##0019 

M0018*# 

100 

dw 

M0002** 

101 

dw 

MO015** 

M0O14## 

102 

dw 

103 

dw 

M0017*« 

M0019 

104 

dw 

リストト 7 -b 

acheck.mc 

1 

include 

CLASS.DEF 

2 

include 

ACHECK.DEF 

3 

dseg 


4 

atobj :: da 

2 

5 

atflag :: ds 

1 

6 

caeg 


7 

acheck :: dw 

metaclasa 

8 

dw 

instancemethod 

9 

10 

11 

dw 

ivarsize 

atcheck : 


12 

Id 

hi,holdhk 

13 

add 

hi, be 

14 

15 

push 

Id 

be 

c,(hl) 

16 

inc 

hi 

17 

Id 

b,(hi) 

18 

tloop: 


19 

Id 

a,c 

20 

or 

b 

21 

JP 

z,qrtatcheck 

22 



23 

dachecknextobj 

24 

push 

de 


pop 
JP 

qrtatcheck : 


Oacheckatcheck 
be 

tloop 


29 


pop 

be 

30 


ret 


31 


end 


32 





リスト 1 

-日- 

a backg.c 

1 


meta 

class 

2 

metaclasa : 


3 


dw 

metaclaa8 

4 


dw 

classMethod 

5 




6 


clasf 

i var 

8 

mclass 

defl 

0 

9 

imethod 

defl 

2 

10 

memsiz 

defl 

4 

11 

pnumb 

defl 

6 

12 

evarsize 


equ 7 

13 




14 

_selfnew 

macro 

15 


Belfclass 0 

16 


endm 



__selfalloc macro 

aelfclass 2 

endm 

supernew macro 

call @00016## 

endn 


122 Oh! X 1988.7. 


coi 丨 n 
To pel 0 
H t yd hlt 
G a » f ( p a 
I I 11 ， 0, 
R p h h a T m 


cpjpldadldcpjp 






















hiixpoint 
hi, be 
a p (hl) 

(xp 参 #), a 
hi,ypoint 
hi, be 
a f (hl) 
(yp##) f a 
hi 9 setp 
hi, be 
a f (hi) 
(pat##) f a 
be 

bc»swork## 

enputc 

be 


nl v xpo: 
hi, be 


int 


a,(hi) 
(xp#l),a 
hi,ypoint 
hi, be 
a,(hi) 
(yp##) 

(P&t# 参 > 
be 

be, sviork 参 # 
enputc 
be 


freeobj : 

dselfcleara 
Pauperfreeobj 
ret 
end 


21 

22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 

59 

60 
61 
62 

63 

64 

65 

66 

67 

68 

69 

70 

71 

72 

73 

74 

75 

76 

77 

78 

79 

80 
81 
82 

83 

84 

85 

86 

87 

88 

89 

90 

91 

92 


•J ス M-10-a sbody.def 


: = = = = = = = = = = sbody.def = = = = = 
； meta class 

metaclass : 

dw metaclass 

dw classMethod 

; class var 

inclass def 1 0 


9 

imethod 

defl 

2 

10 

memsiz 

defl 

4 

11 

chare 

defl 

6 

12 

cvarsiz« 


equ 

13 




14 

_8eifnew 

macro 

15 


aelfcla88 I 

16 


endm 


17 

selfalloc 

macro 

18 


seifclass 

19 


endm 


20 

_selfmakep 

macro 

21 


selfcla88 

22 


endm 


23 




24 

_supernc 


macro 

25 


call 

dd0016#« 

26 


endm 


27 

supera1loo 

macro 

28 


call 

M0OOO## 

29 


endm 


30 

_8upermakep 

macro 

31 


call 

d 锾 0020 参 《 

32 


endm 


33 

classMethod : 


34 

^0025 

equ 

makep 

35 


public 

M0025 

36 


dw 

抑 0016## 

37 


dw 

990000## 

38 


dw 

抑 0025 

39 




40 

; 

instancc 

? var 

41 




42 

class 

defl 

0 

43 

1inkup 

defl 

2 

44 

linkdw 

defl 

4 

45 

holdhk 

defl 

6 

46 

setp 

defl 

8 


_superalloc macro 

call MOO00## 

endm 

^screennew macro 

callclass 
endm 

_acreenalloc macro 

callclass 
endm 

claasMethod: 

990020 equ makep 

public ««0020 

dw M0016## 

刪000## 
咖 020 


0 


dw 

dw 


instance var 


44 

class defl 

0 

45 

linkup defl 

2 

46 

linkdw defl 

4 

47 

holdhk defl 

6 

48 

setp defl 

8 

49 

xpoint del 1 

9 

50 

ypoint defl 

10 

51 

ivarsize 

equ 11 

52 



53 

•selffreeobj 

macro 

54 

seifinstance 0 

55 

endm 


56 

•selffree 

macro 

57 

selfinsi 

Lance 2 

58 

endm 


59 

分 selfnextobj 

macro 

60 

selfinstance 4 

61 

endm 


62 

»selflink 

macro 

63 

selfin8tance 6 

64 

endm 


65 

㉞ selfdemon 

macro 

66 

self inai 

tance 8 

67 

endm 


68 

daelfatcheck 

macro 

69 

seifinsi 

Lance 10 

70 

endm 


71 

^selfclears 

macro 

72 

selfinstance 12 

73 

endm 


74 

^selfshows 

macro 

75 

selfins 

tance 14 

76 

endm 


77 



78 

省 superfreeobj 

macro 

79 

call 

« 咖 18" 

80 

endm 


81 

场 superfree 

macro 

82 

call 

M0002## 

83 

endm 


84 

O8upernextobj 

macro 

85 

call 

M0015## 

86 

endm 


87 

dauperlink 

macro 

88 

call 

M0014*# 

89 

endm 


90 

dauperdemon 

macro 

91 

call 

M0017## 

92 

endm 


93 

08uperatcheck 

macro 

94 

call 

M0019## 

95 

endm 


96 

dscreenfreeobj 

macro 

97 

callinstance 0 

98 

endm 


99 

省 Bcreenfree 

macro 

100 

callinstance 2 

101 

endm 


102 

9screenbox 

macro 

103 

callinstance 4 

104 

endm 


105 

9screenputc 

macro 

106 

callinstance 6 

107 

endm 


108 

instanceMethod: 


109 

MO024 equ 

freeobj 

110 

public 

d«0024 

111 

#(10023 equ 

clears 

112 

public 

M0023 

113 

¢100022 equ 

shows 

114 

public 

M0022 

115 

M0021 equ 

atcheck 

116 

public 

M0021 

117 

dw 

M0024 

118 

dw 

M00O2*# 

119 

dw 

990015#* 

120 

dw 

•#0014#* 

121 

dw 

090017 参参 

122 

dw 

M0021 

123 

dw 

M0023 

124 

dw 

M0022 

リス M-9-b snakep.mac 

1 

include 

CLASS.DEF 

2 

include 

SNAKEP.DEF 

3 

dseg 


4 

xa: : ds 

1 

5 

ya: : ds 

1 

6 

cseg 


7 

snakep: : dw 

metaclass 

8 

dw 

instanceroethod 

9 

dw 

ivarsize 


makep: _seifnew 

Id 

add 
Id 
Id 
Id 
add 


Id 

Id 


hl f xpoint 
hi 9 de 
a,(xa) 
(hl),a 
hl t ypoint 
hl.de 
a.(ya) 
(hl) t a 


▲ X1C を買ってからすぐにディスクの時代に入ってしまい，不満の続く日々でしたが ，X 
68000 ACE-HD に感 $ 力してこのたび眯人を決意しました。 Oh!MZ ともしばらく別れていま 
したが，また毎月読もうと思います。おっと，もう Oh!X でしたっけね。これからもよろ 
しく。 倉橋稚夫 (19 ) 京都府 


xpoint def 1 


48 

ypoint defl 

10 

49 

tcount defl 

11 

50 

ivarsize 

equ 13 

51 


52 

©seiffreeobj 

macro 

53 

self im 

stance 0 

54 

endm 


55 

©selffree 

macro 

56 

self me 

stance 2 

57 

endm 


58 

^Iselfnextobj 

macro 

59 

selfinatance 4 

60 

endm 


61 

«selflink 

macro 

62 

selfinatance 6 

63 

endm 


64 

dselfdemon 

macro 

65 

selrinf 

stance 8 

66 

endm 


67 

Oselfatcheck 

macro 

68 

selfinf 

stance 10 

69 

endm 


70 

dselfclears 

macro 

71 

selfinatance 12 

72 

endm 


73 

Oselfshows 

macro 

74 

selrmstance 14 

75 

endm 


76 



77 

Pauperfreeobj 

nacro 

78 

call 

d 00024 参 * 

79 

endm 


80 

dsuperfree 

macro 

81 

call 

M0002## 

82 

endm 


83 

84 

dsupernextobj 

call 

macro 

MOOlSt# 

85 

endm 


86 

08uperlink 

macro 

87 

call 

M0014## 

88 

endm 


89 

^Buperdeinon 

macro 

90 

call 

000017#* 

91 

endm 


92 

^superatcheck 

nacro 

93 

call 

M0O21## 

94 

endm 


95 

猶 superclears 

macro 

96 

call 

M0023## 

97 

endm 


98 

daupershows 

macro 

99 

call 

•00022** 

100 

endm 


101 

instanceMethod : 

102 

MO026 equ 

demon 

103 

104 

public 

dw. 

M0026 

M0024#* 

105 

dw 

« 省 0002## 

106 

dw 

省❷ 0015## 

•#0014## 

107 

dw 

108 

dw 

090026 

109 

dw 

M0021*# 

M0023»« 

110 

dw 

111 

dw 

M0022#« 


リス M-10-b 

sbody.mac 




1 

include 

GLASS.DEF 

2 

include 

SBODY.DEF 

3 

d8eg 


4 

ca： : ds 

2 

5 

bcc： : ds 

1 

6 

cseg 


7 

sbody :: dw 

metaclass 

8 

dw 

instancenethod 

9 

dw 

ivarsize 

10 



11 

makep : superro 

akep 

12 

push 

be 

de 

a,(bcc) 
hi•setp 

13 

14 

push 

Id 

15 

Id 

16 

17 

add 

Id 

hl 9 de 

(hl) # a 

18 

19 

Id 

Id 

b 9 d 

c,e 

20 

dselfshowa 

21 

pop 

de 

22 

23 

pop 

Id 

be 

hi f tcount 

24 

add 

hl,de 

25 

26 

push 

Id 

de 

de,(ca) 

27 

Id 

(hl) f e 

28 

inc 

hi 

29 

Id 

(hl) f d 

30 

pop 

de 

31 

ret 


32 



33 

demon : 瘡 superd 

emon 

34 

35 

Id 

add 

hi,tcount. 
hl.be 

36 

Id 

e t (hl) 

hi 

37 

inc 

38 

Id 

d f (hi) 
de 

39 

dec 

40 

Id 

(hl) t d 

41 

dec 

hi 

42 

Id 

(hl) f e 

43 

Id 

a,e 

44 

or 

d 

45 

JP 

nz 9 qrtdenon 


dselffreeobj 
qrtdemon ： 

ret 

end 
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hrihre 
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1 

2 

3 

4 

5 

6 

7 

8 

9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 

21 

22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

.18 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 

59 

60 

61 

62 

63 

64 

65 

66 

67 

68 

69 

70 

71 

72 

73 

74 

75 

76 

77 

78 

79 

80 

81 

82 

83 

84 

86 

87 

H8 

8 9 

90 

91 

92 

93 

94 

95 

96 

97 

98 

99 

100 

101 

102 

103 

104 

105 

14)6 

107 

108 

109 

110 

111 

112 

113 

114 

115 

116 

117 

118 

119 

120 

121 

122 


hi,gcount 
hi,bc 
e,(hi) 
hi 

d,(hl) 
(caf#),de 


Id 

add 

id 

Id 

Id 

add 


hl f x 


Id 

id 

add 

Id 

Id 

push 

Id 

sb 

Id 

Id 

Id 


mt 


,xpoii 
hi t be 
a,(hi) 

(xaf#) t a 
hi,ypoint 
hi,be 
a,(hl) 

(ya##),a 
hl.blp 
hl.be 

a, (hi) 

(bee##),a 
be 

be,sbody## 
sbodyroakep 

b, d 

c, e 

de,bwork##+hoidhk 
dsbodylink 


pop 

be 

Id 

hi,unumb 
hi, be 

add 

Id 

a,(hi) 

push 

Id 

be 

be•jwork## 

ttjoypotinp 

pop 

be 

or 

11110000b 

inc 

a 

JP 

z»notinp 

dec 

a 

Id 

Id 

d,4 

hi,joytable 

rrca 


JP 

nc f readj 

inc 

hi 

inc 

hi 


inc 

hi 

Id 

d, (hi) 

ex 

de.hl 

Id 

a, (hi) 

Id 

(xa##),a 

inc 

hi 

Id 

a, (hi) 

Id 

(ya##) f a 

inc 

hi 

Id 

id 

inc 

a,(hl) 

(xm),a 
hi 

Id 

Id 

a,(hi) 

(ym),a 

inc 

hi 

Id 

a, (hi) 

Id 

(uc),a 

inc 

hi 

Id 

Id 

a f (hi) 

(bkc) y a 

aupermakep 

Id 

a,(un) 

Id 

hi,unumb 

add 

hi,de 

Id 

(hi) f a 

Id 

a,(xm) 

Id 

hi,xmove 

add 

hi v de 

Id 

(hl) f a 

Id 

a,(ym) 
hi,ymove 
hl,de 

Id 

add 

Id 

Id 

(hl) f a 
a,(uc) 

Id 

hi f aetp 

add 

hl.de 

Id 

(hl),a 

Id 

a•< bkc) 

Id 

hl,blp 

add 

hl,de 

Id 

(hl),a 

ret 


dsuper 

Id 

•demon 

hi,mcount 

add 

hi,be 

Id 

e, (hi) 

inc 

hi 

Id 

d,(hl) 

dec 

de 

Id 

(hl) f d 

dec 

hi 

Id 

(hl),e 

Id 

a,e 

or 

d 

JP 

nz,setadd 

Id 

de,ADDTIME 

Id 

(hl),e 

inc 

hi 

Id 

(hl) f d 

Id 

hiigcount 

add 

hi, be 

Id 

inc 

e f (hi) 
hi 

Id 

d f (hi) 
hi 

hl,ADDVAL 

push 

Id 

add 

hl f de 

ex 

de f hl 

pop 

Id 

hi 

(hl) f d 

dec 

hi 

Id 

(hl),e 


リスト 1-11-a shead.def 


: = = = = = = s === shead.def = = = = = 
； meta class 

metaclass : 

dw metaclass 

dw classMethod 

; class var 


mclass def1 
imethod def1 
memsiz def1 
evaraize 


equ 


macro 

d«OOO0t# 


macro 


_selfnew macro 

selfclass 
endm 

_selfalloc macro 

selfolass 
endm 

__seifmakep macro 

seifclass 
endm 

_aupernew macro 

call 桃 ⑽ 16 

endm 

_superalloc 
call 
endm 

_supermakep 
call 
endra 

_achecknew 

callclass 
endm 

_acheckalloc macro 
callclass 
endm 

_joypotnew macro 

callclass 
endm 

_joypotalloc macro 

callclass 
endm 

_sbodynew macro 

callclass 
endm 

_sbodyalloc macro 

callclass 
endn 

_sbodymakep macro 

callclass 
endn 

classMethod ： 


««0O28 

equ 

new 


public 

«90028 

柳 0027 

equ 

makep 


public 

⑽ 0027 


dw 

@90028 


dw 

@90000## 


dw 

900027 

； 

instance var 

class 

defl 

0 

linkup 

defl 

2 

linkdw 

defl 

4 

holdhk 

defl 

6 

setp 

defl 

8 

xpoint 

defl 

9 

ypoint 

defl 

10 

unumb 

defl 

11 

mcount 

defl 

12 

gcount 

defl 

14 

xmove 

defl 

16 

ymove 

defl 

17 

blp 

defl 

18 

ivaraize 

equ 

©selffreeobj 

macro 


selfinstance 
endm 

®aelffree macro 

selfinatance 
endm 

dselfnextobj macro 

selfinstance 
endn 

场 selflink macro 

selfinstance 
endn 

dselfdemon macro 

selfinstance 
endn 

9selfatcheck macro 

selfinstance 
endm 

dselfcleara macro 

selfinstance 
endm 

^self ahovia macro 

selrmstance 
endm 


#superfreeobj 
call 
endn 

dauperfree 

call 

endm 

08upernextobj 

call 

endm 

dsuperlink 

calL 

endm 

dsuperdemon 

call 

endn 

dsuperatcheck 

call 

endm 


macro 

M0002## 


123 

124 

125 

126 

127 

128 

129 

130 

131 

132 

133 

134 

135 

136 

137 

138 

139 

140 

141 

142 

143 

144 


macro 

@@ 0022 ## 


call 
endm 

dsuperahows 
call 
endm 

fiacheckfreeobj macro 
CQlIinstance 
endm 

Qacheckfree macro 

callinstance 
endm 

9achecknextobj macro 
callinstance 
endm 

场 achecklink macro 

callinstance 
endm 

Qacheckdemon macro 
callinstance 
endm 

^acheckatcheck macro 
callinstance 


145 

endm 


146 

®joypotfreeobj 

macro 

147 

callinal 

bance < 

148 

endm 


149 

®joypotfree 

macro 

bance : 

150 

callinal 

151 

endm 


152 

^joypotinp 

macro 

153 

callinstance 1 

154 

endm 


155 

^abodyfreeobj 

macro 

156 

callinstance ( 

157 

endm 


158 

dabodyfree 

macro 

159 

callinstance : 

160 

endm 


161 

dabodynextobj 

macro 

162 

callinstance ^ 

163 

endm 


164 

^sbodylink 

macro 

165 

callinstance ( 

166 

endm 


167 

@sbodyderoon 

macro 

168 

callinstance 1 

169 

endm 


170 

砀 sbodyatcheck 

macro 

171 

callinal 

Lance 

172 

endm 


173 

场 sbodyclears 

macro 

174 

callinstance 

175 

endm 


176 

dsbodyshows 

macro 

177 

callinstance 

178 

endm 


179 

inatanceMethod: 


180 

M0029 equ 

demon 

181 

public 

M0029 

182 

dw 

M0024** 

183 

dw 

MO0O2## 

184 

dw 

刪 015## 

185 

dw 

«d0014»# 

186 

dw 

抑 0029 

187 

dw 

«00O21*» 

188 

dw 

000023#* 

189 

dw 

M0022## 


78 

79 

80 
81 
82 

83 

84 

85 

86 

87 

88 

89 

90 

91 

92 

93 

94 

95 

96 

97 

98 

99 
100 
101 
102 

103 

104 

105 

106 

107 

108 

109 

110 
111 
112 

113 

114 

115 

116 

117 

118 

119 

120 
121 



リスト 1 

-11-b 

shead.mac 

122 

123 




124 




125 

126 

1 


—— SneclQ •ulaC ----- ---- 

include CLASS.DEF 

2 


include 

SHEAD.DEF 

127 

3 

COUNTD 

equ 

30 

128 

4 

ADDTIME 

equ 

60 

129 

5 

ADDVAL 

equ 

10 

130 

6 


dseg 


131 

7 

un: : 

da 

1 

132 

8 

xm ： 

d8 

1 

133 

9 

ym : 

ds 

1 

134 

10 

uc : 

da 

1 

135 

11 

bkc ： 

ds 

1 

136 

12 


caeg 


137 

13 

shead: : 

dw 

metaclass 

138 

14 


dw 

instancemethod 

139 

15 


dw 

ivarsize 

140 

16 




141 

17 

new ： 

supernew 

142 

18 


Id 

hi,gcount 

143 

19 


add 

hi, de 

144 

20 

21 


push 

Id 

de 

de,COUNTD 
(hl) f e 

145 

146 

22 


Id 

147 

23 


inc 

hi 

148 

24 


Id 

(hi),d 

149 

25 


pop 

de 

150 

26 




151 

27 


Id 

hi,mcount 
hl f de 

152 

28 


add 

153 

29 


push 

de 

154 

30 

31 


Id 

Id 

de,ADDTIME 
(hl) t e 

155 

156 

32 


inc 

hi 

157 

33 


Id 

(hl) f d 

158 

34 


pop 

de 

159 

35 




160 

36 


xor 

a 

161 

37 


Id 

hi,xmove 

162 

38 


add 

hl f de 

163 

39 


Id 

(hi),a 

164 

40 


Id 

hi 9 ymove 

165 

41 


add 

hl.de 

166 

42 


Id 

(hi),a 

167 

43 


ret 


168 

44 




169 

45 

makep ： 

Id 

a, (un) 

170 

46 

47 

48 


Id 

Id 

add 

l»a 
h,0 
hi,hi 

171 

172 

173 

49 


Id 

de,pltable 

174 

50 


add 

hl,de 

175 

51 


Id 

e,(hl) 



joylop: 


d d d n d d 


Oh! X 1988.7. 


▲ Oh ! X の読者のなかにも中岛みゆきフアンはいる（と 
伝えください）。 


6月号133ページの復木さんにお 
武 H 1 泰典 (19) 茨城県 

















hloop: 


push 

Id 

be 

bc f 2000h 

Id 

hl t 1000h 

Id 

d,07h 

call 

clear 

Id 

be,3000h 

Id 

hi,1000h 

Id 

d,，’ 

call 

clear 

Id 

a , ，#， 

Id 

(pat) , a 

Id 

a, 00 

Id 

(yp).a 

call 

hline 

Id 

Id 

a, 24 

(yp) ,a 

call 

hline 

Id 

a, 00 

Id 

(xp),a 

call 

vline 

Id 

Id 

a,39 
(xp),a 

call 

vline 

pop 

be 

ret 


out 

(c) ,d 

inc 

be 

dec 

hi 

Id 

or 

a,l 

h 

JP 

nz,clear 

ret 


Id 

a,39 

Id 

(xp) # a 

call 

putc 

Id 

a, (xp) 

and 

a 

ret 

z 

dec 

a 

Id 

JP 

(xp),a 
hloop 

Id 

a,24 

Id 

(yp)»a 

call 

putc 

Id 

a,(yp) 

and 

a 

ret 

z 

dec 

a 

Id 

OP 

(yp) ia 

vloop 


ret 

end 


リスト 1 -13-b screen.mac 


swork : 
xp:: 

yp: •• 

pat :; 
screen 


alloc : 

Id de,swork 

ret 

putc : 


==== screen.mac ====== : 

include CLASS.DEF 
include SCREEN-DEF 
dseg 

: ds ivarsize 

ds 1 

ds 1 

ds 1 

cseg 

:: dw metaclass 

dw instancemethod 

dw ivarsize 


玢袋 0009 equ 


mp 


57 


public 

桃 0009 

58 

ペ 

dw 

990003## 

59 

i : 

dw 

⑽ 0010 

6e 

i : 

dw 

990009 


リスト 

joypot.mac 





1 


include 

CLASS.DEF 

2 


include 

JOYPOT•DEF 

3 


dseg 


4 

jwork :: 

ds 

ivarsize 

5 


cseg 


6 

joypot : 

: dw 

metaclass 

7 


dw 

instancemethod 

8 


dw 

ivarsize 

9 




10 

alloc : 



11 


Id 

de,jwork 

12 


ret 


13 




14 

inp: 

push 

af 

15 


id 

Id 

be,lc00h 

16 


a,07 

17 


out 

(c) ,a 

18 


Id 

bc,lb00h 

19 


xor 

a 

20 


out 

(c) # a 

21 


pop 

af 

22 

23 


add 

Id 

a,14 

be,lc00h 

24 


out 

(c),a 

25 


Id 

be,lb00h 

26 


in 

a, (c) 

27 


ret 


28 




29 

free: 

ret 


30 


end 



■J スト 1-13-a 

screen.def 

1 

； 

raeta class 

2 

metaclass : 


3 


dw 

metaclass 

4 


dw 

classMethod 

5 




6 


class var 

7 




8 

mclass 

defl 

0 

9 

imethod 

defl 

2 

10 

merosiz 

defl 

4 

11 

evarsize 

equ 6 

12 




13 

selfnew 

macro 

14 


selfclass 0 

15 


endm 


16 

selfalloc 

macro 

17 


selfclass 2 

18 


endm 


19 




20 

supernew 

macro 

21 


call 

@@0001## 

22 


endm 


23 

_supera] 

Lloc 

macro 

24 


call 

抑 0000## 

25 


endm 


26 

classMethod : 


27 

^0004 

equ 

alloc 

28 


public 

dw 

0^0004 

29 


d«0001## 

30 


dw 

M 0004 

31 




32 

； 

instance var 

33 




34 

class 

defl 

0 

35 

ivarsize 


equ 2 

36 




37 

©selffreeobj 

macro 

38 


selfinsl 

: ance 0 

39 


endm 


40 

径 selffree 

macro 

41 


sellxnsl 

: ance 2 

42 


endm 


43 

^selfbox 

macro 

44 


selfinstance 4 

45 


endm 


46 

©selfputc 

macro 

47 


selfinsl 

: ance 6 

48 


endm 


49 




50 

鎊 superfreeobj 

macro 

51 


call 

990003## 

52 


endm 


53 

©superfree 

macro 

54 


call 

000002## 

55 


endm 


56 

instanceMethod : 


57 

柳 0007 

equ 

box 

58 


public 

9^0007 

59 

@90006 

equ 

free 

60 


public 

@90006 

61 

9^0005 

equ 

putc 

62 


public 

©^0005 

63 


dw 

@90003## 

64 


dw 

@®0006 

65 


dw 

鎊 ❺ 0007 


91 

92 

93 

94 

95 

96 

97 

98 

99 
100 
101 
102 

103 

104 

105 

106 


リスト 2 リスト 1 をリンクする八ツチファイル 

180 /d: 800 , runtime,start,object,acter,holder,acheck,backg,snakep,sbodv,shead,joy 
pot,screen,s/n/y/e 


176 

177 

178 

179 

180 
181 
182 

183 

184 

185 

186 

187 

188 

189 

190 

191 

192 

193 

194 

195 

196 

197 

198 

199 

200 
201 
202 

203 

204 

205 

206 

207 

208 

209 

210 
211 
212 

213 

214 

215 

216 

217 

218 

219 

220 
221 
222 

223 

224 

225 

226 

227 

228 

229 

230 

231 

232 

233 

234 

235 

236 

237 


dec 

jp 

JP 

Id 

push 

Id 

add 

Id 


Id 

Id 

add 


notinp: 


Id 

add 

Id 

Id 

add 

add 


Id 
add 
Id 
Id 
add 
add 
Id 

Qselfahows 


nz,joylop 
notinp 

a,(hl) 

hi 

hi f xmove 
hi,be 
(hi),a 
hi 
hi 

a,(hi) 
hi t ymove 
h i ， be 
(hl),a 

hi,xraove 
hi, be 
a,(hi) 
hi,xpoint 
hi, be 
a,(hi) 
(hi),a 

hi,ymove 
hi, be 
a,(hi) 
hl,ypoint 
hi, be 
a,(hi) 

(hi) # a 


xor 

Id 

Id 

push 

Id 


(atflag##),a 
(atobj##)；bc 
be 

be,bwork## 


❺ acheckatcheck 


be 

a,(atflag##) 


©selffreeobj 
ret 


joytable : 

db 


00 ,- 1 , 00 , 01 ,- 1 , 00 , 1,00 


pl0,pll >p 12,pl3 


db 

db 

db 

db 

db 

db 

db 


10,13,0，- 
，，0， 
12,0，1 


6 ,- 1,0 
, ， 2’ 
19,1,0 


リスト 1-12-a joypot.def 


=========== joypot.def s=== 

； raeta class 

metaclass : 

dw metaclass 

dw classMethod 

; class var 

mclass defl 0 

imethqd defl 2 

memsiz defl 4 

evarsize equ 6 

^aeifnew macro 

selfclass 


15 

endm 


16 

selfalloc 

macro 

17 

selfclass 

18 

19 

endm 


20 

supernew 

macro 

21 

call 

@@0001## 

22 

endm 


23 

_superalloc 

macro 

24 

call 

柳 0000## 

25 

endm 


26 

classMethod : 


27 

@@0008 equ 

alloc 

28 

public 

❺ @0008 

29 

dw 

©Q0001## 

30 

31 

dw 

000008 

32 

33 

; instance var 

34 

class defl 

0 

35 

36 

ivarsize 

equ : 

37 

©selffreeobj 

macro 


selfinstance 0 

endm 

©selffree macro 

selixn8tance 2 

endm 

®aeifinp macro 

selfinstance 4 

endm 

袋 superfreeobj macro 

call @@0003## 

endm 

dsuperfree macro 

call 990002## 

endm 

dnstanceMethod: 

equ free 

public 細 010 


p 116111 p 
y oohhbhhh X 


(a a 0 0 


c o c a a 
V b 3 b p 丨 


I f » 1 cl » I fee 
a cbhbh cb a(b 


udddddddddddddddddddd u o e 
PI 1111 a a a a a alll al alll opr 


▲「あぶない福袋」は虚実入り乱れているようで本当にあぶない。もっとあぶないのは突 
如現れた満開製作所の広告だ。「あぶない福袋」の子ディレクトリのような気もしたが，即 
日6,000円持って郵便局へ走った私であった。 高橋良和 (34) 東京都 


実用 （？） オブジ I クト指向のゲ_ムプログラミング 125 ! 
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最終回 


危険な事情 


Ippei 祝 - 平 


大地最低の作戦 


しばらく前，テレビや新聞をにぎわした 
ニュースに， 「法律を変えて，土地の所有権 
を地下50メートルまでに制限する」という 
のがあった。 

これはよ一するに，政府の無能によって 
土地の値段がガパ'ガバになってしまったの 
で，地下鉄の建設費が巨額になったことへ 
の対策であるらしい。現在の法律では地下 
鉄を通すとき，土地代の数割を支払うこと 
になっているのだそうだ。 

そいでもって，私はこのニュースを聞い 
たとたん， 

地下帝国を建設する 

という，マンダムな野望を思いついたので 
あった。土地の権利が地下50メートルまで 
に制限されるということは，よ一するにそ 
れより下は誰のものでもないということで 
はないか。つまりは 早い者 勝ちということ 
じやないか。であるからして，とりあえず 
はなんとかして10坪ぐらいの土地を買い， 
下に50メートル掘り進む。そして法律が成 
立するのをコシタンタンと待ち，一目散に 
横にガンガンと掘り進む。これで地下帝国 
のいっちよ上がりである。こうすれば，日 
当たりは悪いが，エレベータに乗って1分 
で都心に出られるという最高の場所がしこ 
たま手に入るのである。下に掘る分は OK 
なのだから，地下50メートルから始まる“低 
層建築”で巨大なビルを建てれば，たちま 
ち大金持ちである。 

てなことをホイホイと夢想していたのだ 
が，落ち着いて考え直してみると，これだ 
けオイシイのであれば，やっぱり国有とい 
うことになってしまって，利権とか使用権 
とかは，ぜ一んぶ政治家の手の中という， 
いつもの結末が見えてしまった。そうだよ 
な一。さもないと，東京の地下が穴だらけ 
のボコボコになって，そこらじゅうで落盤 
してしま うのである。 

しかし待てよ。たとえば新宿や渋谷や丸 


の内の地下50メー トルに駅を作れるとなる 
と，これはとんでもない利権ではない力、。 
いやいや，別に地下鉄の駅と決まったわけ 
ではない。原則的に国有地になるんだから， 
払い下げを受けて地下街を作るということ 
だってあり得るじやない力、。 

この方式に よる 地下鉄建設には，営団地 
下鉄などの公共団体だけではなく，西武グ 
ループなん かも意欲を示して いる そ 一で あ 
る。そうなると，西武鉄道がねっとりと都 
心に乗り込んでくるわけだ，そいでもって， 
地下に大デパートができて……。 

そうである。もしかしたら，この「地下 
50メートル」という話には，ものすごく 44 危 
険な事情”が秘められているのではないだ 
ろう力、。だって，都心の一等地ばかりでは 
なく，日本全土がどど一んと“国有地”に 
なるのである。うんと安く払い下げるとし 
ても数兆円は下らないであろう。これはと 
んでもない利権ではないか。うう〜ん，私 
も選挙に立候補したくなってきた。 

しかし待てよ。もしも勝手に地下を国有 
地にされてしまったら，今までは当然の権 
利であったはずの，温泉を掘るためのボー 
リングエ事とか，高いビルを作るための基 
礎工事とかができなくなるではないか。こ 
れはおかしいぞ。よし，もしも私の土地(持 
ってないけど）の下に勝手に地下鉄なんぞ 
を作ったら，線路の真ん中にボーリング用 
のパイプを打ち込んで，「温泉を掘るんだあ 
—」といってダダをこねてやろう。 


' TR 〇 N のよ一で， 
TRON じやない,ベンベン 


最近あちこちでうごめいている「国定パ 
ソコン」 である力 ? ，私はこの教育 パソコン 
にも危険な事情が潜んでいるのではないか 
とニラんでいる。試作機は8社から出され 
ているが，実は全部松下と富士通の OEM 
なので，本当は2種類しかないそ一である。 
ほ一らほら，危険なにおいがしてきたであ 
ろぅ。 

で，この教育パソコンのキーボードがち 



ードはたいていが旧 JIS 規格)。きっとほと 
んどの読者は，新 JIS のキーボードを見た 
ことがないであろう。実は私も見たことが 
ないのである。そこで，図1に教育バソコ 
ンなるもののキー配置を示しておく。 

まず，注目していただきたいのが，右の 
[上段]キー （ SHIFT のことだな）のすぐ左 
隣に，普通のパソコンには必ずあるはずの， 
[口](と[― ]•• アンダーバー）力すないとい 
うことである。新 JIS ではそのように決め 
られてしまっているのである。それから， 
かなの配列が現在のバソコンのキーボード 
とはぜんぜん違うというのも大胆である。 
特に奇怪なのが，母音などの大文字と小文 
字の配置である。現在のパソコンでは，か 
なモードの時に [ Z ] で“つ”， [ SHIFT ] + 
[ Z ] で“っ”などとなっているのであるが， 
新 JIS では何を考えたのか，「あいうえおや 
ゆよつ」と「あぃうぇおゃゆょっ」の位置 
閨係がバラバラなのである。英字キーの位 
置で示すと， 

大文字— BKJUjo+gY 

小文字-^ qazxcbfTN 
と，なっている。やっと国産パソコンのキ 
ーボードの配置が統一されつつあるという 
のに，なんで今さらこんなものを持ち出し 
てきたのであろう力、 JIS だからといって， 
こんな横暴が許されていいのか？ 

それからなんといっても，右端のテンキ 
一部分でキラリと光っている[と](小学校 
では加算記号“ + ”を習う前に「と」を使 
う），[分の]という2つの キーは 見逃せな 
いであろう。パソコンの常識で考えれば， 


12〇 Oh! X 1988.7. 





























こういうものは無理やりキーにしたりせず 
に， フアンクシヨン キーに割り当てるべき 
じ やないの力、。 フアンクシヨン キーなら， ラ 
ベルを変えることが可能だろうし，キー定 
義を変えることだって可能だ。全学年で必 
要なものならまだしも，実際こんなキーは 
小学校専用 じ やないか。教育パソコンは中 
学校でも使われる予定なんだろ？ だった 
ら中学校ではまったくの無駄じやないか。 
いいや無駄だけではすまない。むしろ邪魔 
ではないの 力、ど 一して フアンクシヨン キ 
一に割り当てなかったんだ？ フアンクシ 
ヨンキーとは，こういうときのためにある 
んだぞ。何考えてんだ，あんたたち。 

ほかにも[制御] ([ CTRL ] だな）の位 
置が狂ってるとか， スペースが 異常に右に 
寄っているとか，もう勝手にしてくれとい 
いたくなるぐらい斬新なキーボードである。 
これじや現在のパソコンのキーボードと非 
コンパチではないか。それも，なんの必然 
性もない変更ばかりだ。もはやこうなった 
ら責任者出てこい，である。 

そして肝心のソフトであるが，さすがに 
ワープロ や カ ルタなどをひと通り揃えな け 
れば大ひんしゅくだということには気がつ 
いているようで，現在各社で手分けして作 
っている最中らしい。そして，移植を促進 
するために補助金も出るそうである。しか 
しどう考えても，結局ソフトの主流は 98 か 
らの移植ということにならざるを得ないの 
ではないだろうか？ つまり， 98 用だった 
らすでに存在しているものを，わざわざ移 
植することになる0そうなってくると，ハ 
ードウエアの性能はだいたい同じなのだか 
ら，どうやっても， 98 のソフトの質と量に 
追いつくのに，相当な時間がかかるのでは 
ないだろうか。 

教育 パソコンを98 以外のものにしたいと 
いう気持ちはわからないわけじやない。だ 
けど，使われているのは税金なんだぞ。で 
きた パソコンやソフ トを小中学校が買う に 

図1 教育パソコン用キーボード 


しても，その金はぜ一んぶ税金から出るん 
だぞ。総額 9 千億円なんだぞ。こんな短期間 
にわたわたとやって，ちゃんと世間様に顔 
向けできるマシンとソフトが作れるのか？ 

この教育 パソコンに 関しては，.松下が 一 
番乗り気であるらしい。ううむ，実にキナく 
さい。そういえば，数年前に松下が IBM - 
PC の コンパチマシンを 米国に輸出した力す， 
たちまち IBM から クレームが つき，あわて 
て引っ込めたという出来事があったな。あ 
の背景は，実は IBM-PC のハードウェアを 
作っていたのは松下だったということによ 
るものらしい。そのような危険な事情があ 
るにもかかわらず， コンパチマシンに 手を 
出したのであるから，当然といえば当然の 
結果だったのかもしれない。で，この危険 
な事情が今も尾を引いているので，松下は 
「 AX 」 に手を出せないでいるのではない力 1 。 
なぜならば AX は PC / AT とコンパチ だから 
である。ここに MSX がいまいちだという 
事情も加わり，松下は教育 パソコンに 活路 
を求めているのではないだろうか。 

そもそも教育に規格を持ち込むという発 
想からしてものすごい。 

坂村のケンちゃんにしても，一世一代で 
頑張っている BTRON の 0 S を，このような 
中途半端な機械（失礼）に流用されるのは 
不本意なはずであろう。しかし，文句をい 
う気配がない。原著作権を持ってるんだか 
ら，「こんな パソコン のために BTRON を 
やってるんじゃねえ！」とかいって怒りそ 
うなものである力 ? ，そうしない。ふむふむ。 
きっと坂村氏には坂村氏なりの危険な事情 
があるのだろう。 


ホットな島(だって熱帯だモン) 


総費用 300 億円という沖ノ鳥島の保全エ 
事が始まった。そのニュースを見てて思い 
ついたことであるが（最近はニュースを見 
ながら，いろんなことを思いつく〉，もしも， 


人類タコ科図鑑 

こっそり船で沖ノ鳥島に行って，誰も見て 
いないうちに2つの岩を爆破しちまってい 
たらど一なったであろうか。工事に来た人 
たちはおろ力、，日本中が腰を抜かす空前絶 
後のプラクティカルジョークになったので 
はないがと思うのであるが，ど一であろう。 
国際法では人工物は領土と認められないそ 
うだから，あわててコンクリートかなんか 
でぺ夕ぺ夕とく っつけ 直してもだめなはず 
である。ということは，ダイナマイト数本 
で「日本全土とほぼ同じ広さの経済水域」 
が“ぱあ”になってしまうわけだ。ううむ0 
やっぱりこれは，ちょっと笑えないか。 

そのニュース報道によれば，戦前にも沖 
ノ鳥島で工事があったそうである。そのと 
きは，気象観測のための施設を作るという 
ことだった力' 実はそれはタテ マエで， 本 
当は，軍事施設を作りたかったんだそうで 
ある。 

ということは，今回の「経済水域を確保 
する」という名目の裏にも，ひょっとした 
ら危険な事情が隠されているのかもしれな 
い。公にはできない何か。そうだそうだ。 
現在の日本の土木技術と経済力があれば， 
レーダー 基地ぐらいなら簡単に作れてしま 
うではないか。そう考えていくと， 300 億 
円という費用があれだけスンナリ I :決まっ 
たというのも説明できるではないか。う〜 
ん，危険危険。 


ああ ， NHK 


新聞に載ってたが， NHK の世論調査で， 
税制改革に反対する意見が急増し，全体の 
48% に達しているという結果が出たそうで 
ある。しかし， NHK はそれを放送せずに 
内部の関係雑誌に載せるにとどめたそうだ。 
NHK はその理由として，調査結果が出る 
直前に自民党の税調が答申を発表したので， 
それに対する反対だと誤解されるのを避け 
るためだといっているそ一である。何考え 
てんだコノヤロ。ちゃんと，「これは いつい 
つの調査であって，先日の何々とは関係あ 
りません j と断りを付ければなんの恂題も 
ないだろう。受信料は非課税になるのかな 
— ? 衛星放送の有料化は許可されるのか 
な一？うむうむ。危険な事情。 

息 & 

そ一ゆ一わけで突然最終回なのであった。 
ど一して急に終わるのかつ一と，やはりそ 
こには危険な事情があったりするのである。 
では C 調言語で会いましよう，であった。 
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MZ -1500 用 

テクノポリス/邂逅 

Xl / Xlturbo 用 

アフター バーナー 

MZ - 2500用 

TRUTH 


in 





Mori Hiroshi 

森弘 


Kaneko Shunichi 

圣孕俊一 


Kurata Yoshto 

倉田晶人 


今月は久びさに MZ -1500 用の作品も登場で 
す。曲目はちよつと懐かしの YM 〇の作品 
から2曲。 XI 用にはゲームセンターでお馴 
染みのアフターバーナー，そして MZ - 2500 
用には SQUARE の TRUTH と，バラエテ 
ィ豊富にお届けします。そろそろ，クラシ 
ツクも欲しいところですが……。 


久びさの MZ - 1500用です 


まずは MZ -1500 の PSG 6 音による YMO の 
TECHNOPOLIS と遊逅をメドレーで聞い 
てもらいましよう。 MZ -1500 用の投稿はあ 
まり数が多くないのです 力す， 1 つ ひと つの 
レベルは結構高いようですね。このプログ 
ラムでは PSG でノイズを出すために BAS 
1 C を一部書き換えています。ドラムパート 
などの処理で苦労した方には参考になるの 
ではないでしよう力、 MZ -1500 の PSG は 
いじりまわせばもっともっと面白いことが 
できるはずです。ここはひとつ ユーザーの 
帑起に期侍したいところです。 


ムも出ていますからそれほど目立たなくな 
りましたが。 

今回掲載するのは AFTER BURNER と 
いうゲームの 「AFTER BURNER 」 という 
曲です0この ゲームの メイン テーマと でもい 
うべき名曲なのですが，もとがサンプリン 
グ音源を駆使した音色ですので，はたして 
FM 音源で再現することができるか，とい 
う難曲でもあったわけです。一部 MML の 
書き換えを行っていますが，プログラム自 
体は Oh ! MZ 1987 年8月号で発表された MM 
L でも，単行本『試験に出る XI 』に掲載さ 
れたものでも共通に使用できるようになっ 
ています。また，このプログラムではオタ 
ター ブ〇を使用したところもありますので， 



◎SEGA 


聞いたことがあるかもしれません。フジテ 
レビの F 1 中継のテーマ曲としても有名で 
すが，正確にはアルバム 「 TRUTH 」 の A 
面5番目の曲ということです。 

なまじボーカルつきの曲などよりも，こ 


体感ゲームミュージック 


お次は XI 用の AFTER BURNER です。 
このゲームはもうお馴染みですね。セガの 
体感ゲームの中でもぐるんぐるんと上下左 
右に振り回されるというとんでもないゲー 
ムでした。画面のほうも超高速でビュンビュ 
ン背景が流れるわ，ドッグファイトするわ 
でとにかく派手なゲームです。もっとも， 


X - KEYBOARD 上で演奏するときは若干画 
面が乱*れます。 

先月に引き続き金子君の作品ですが，彼 
はまだ受験生，自動車免許もいいけれど， 

もう浪人はしないように。 


SQUARE を MZ で 


最後は MZ - 2500用 TRUTH です 。 SQUA 
RE の曲を6音で演奏するのはキツいかなと 


ういったインストルメンタルのほうが FM 
音源には向いていそうですね。フェードア 
ウトの処理なども自然に決まっています。 
この曲に限ったことではありませんが，ミュ 
ージッタプログラムはできるだけオーディ 
才などに接続してから聞くようにしてくだ 
さぃ。 

なお，このプログラムを演奏するには前 
もって MML を拡張し， FM 77 AV の音色デ 
ータをセットしておく必要があります （0 


最近はギヤラクシーフオースという，プレ 
イするのも恥ずかしいようなもの凄いゲー 


思いましたが，なかなか雰囲気を出してい 
るようですね。この曲は皆さんもどこかで 

リスト】 TECHNOPOUS / 邂逅 


h ! MZ 1987 年9月号参照)。もちろん ， Super 
KEYBOARD にも対応します。 

日本音楽著作権協会許諾第 887041 4-80 1 号 


10 LIMIT$FDFF 
20 DATASFE,$02,$CA,$0A,$FE,$FE,$06,$C2 
30 DATAS0B,$FE,$3C, $21, $F2, $37, $C3, S80 
40 DATAS3B 
50 FOR レ 0TO16 
60 READ D 
70 POKE@$FE00+I,D 
80 NEXT ： P0KE$3B7D,$C3,$0,$FE 
90 P0KES3C31,$0,$1A 
100 REM G0T0888 

110 TEMPO6 ： GOSUB3930 ： GOSUB1700 
120 MUSIC A1$ ； B1$ ； C1$ ； D1$ ； E1$ ； F1$ 

130 MUSIC A2$ ； B3$ ； C2$ ； B2$ ； E2$ ； F2$ 

140 MUSIC A1$ ； B1$ ； C2$ ； D3$ ； E1$ ； F2$ 

150 MUSIC A2$ ； B4$ ； C2$ ； D4$ ； E2$ ； F2$ 

160 MUSIC A5$ ： B2$ ： C2$ ； D5$ ； E5$ ； F2$ 

170 MUSIC A5$ ； B2$ ； C2$ ； D5$ ； E5$ ； F2$ 

189 MUSIC A5S ； B2$ ； C2$ ； D7S ； E5$ ； F2$ 

190 MUSIC AT$ ； BT$ ； C8$ ； D8$ ； E8$ ； F2$ 

260 MUSIC A9$ ； B9$ ； C9$ ； D9$ ； E9$ ； F2$ 

210 MUSIC AA$ ； B9$ ； C9$ ； DA$ ； E9$ ； F2$ 

220 MUSIC A9$ ； B9$ ； C9$ ； D9$ ； E9$ ； F2$ 

230 MUSIC AAS ； B9$ ； CCS ； DA$ ； E9$ ； F2S 
240 MUSIC AD$ ； RDS ； C9S ： DD$ ； ED$；FDS 


250 MUSIC AE$ ； BE$ ； C9$ ； DE$ ； EE$ ； PD$ 
260 MUSIC AD$ ； BDS ； C9$ ； DD$ ； EF$ ； FD$ 
270 MUSIC AG$ ； BG$ ； C9$ ； DG$ ； EG$ ； FD$ 
280 MUSIC AH$ ； BH$ ； C9$ ； DH$ ； EH$ ； F2$ 
290 MUSIC AI$ ； BI$ ； C9$ ； DI$ ； EI$ ； F2$ 
300 MUSIC A9$ ； B9$ ； C9$ ； D9$ ； E9$ ； F2$ 
310 MUSIC AA$ ； B9$ ； C9$ ； DA$ ； E9$ ； F2$ 

329 MUSIC A9$ ； B9$ ； C9$ ； D9$ ； E9$ ； F2$ 

330 MUSIC AA$ ； B9$ ； CJ$ ； DA$ ； E9$ ； F2$ 
340 MUSIC AD$ ； BD$ ； C9$ ； DJ$ ； ED$ ； FD$ 
350 MUSIC AE$ ； BE$ ； C9$ ； DK$ ； EE$ ； FD$ 
360 MUSIC AD$ ； BD$ ； C9$ ； DJ$ ； EP$ ； FD$ 
370 MUSIC AG$ ； BG$;C9$ ； DL$ ； EG$ ； FD$ 
380 MUSIC AH$ ； BH$ ； C9$ ； DM$ ； EHS ； F2$ 
390 MUSIC AI$ ； BI$ ； C9$ ； DI$ ； EI$ ； F2$ 
400 MUSIC B2$ ； B1$ ； C2$ ； B2$ ； E1$ ； F2$ 
410 MUSIC B2$ ； B3$ ； C2$ ； B2$ ； E2$ ； F2$ 
420 MUSIC A1$ ； B1$ ； C2$ ； B2$ ； E1$ ； F2$ 
430 MUSIC A2$ ； B3S;C2$ ； B2$ ； E2$ ； F2$ 
440 MUSIC A1$ ； B1$ ； C2$ ； D3$ ； E1$ ； F2$ 
450 MUSIC A2$ ； B4$ ； C2$ ； D4$ ； E2$ ； F2$ 
460 MUSIC A5$ ； B2$ ； C2S;D5$ ； E5$ ； F2$ 
470 MUSIC A5$ ； B2$ ； C2$ ； DS$ ； E5$ ； F2$ 

MUSIC A5$ ： R2S ： C2$ ； D7$ ； ES$ ； P2$ 


128 Oh! X 1988.7. 


























490 

MUSIC 

入 T$ 

BT$ 

CK$ 

D8$ 

E8$ 

500 

MUSIC 

A9$ 

B9$ 

C9$ 

D9$ 

E9$ 

510 

MUSIC 

AA$ 

B9$ 

C9S 

DA$ 

E9$ 

520 

MUSIC 

A9$ 

B9$ 

C9S 

D9$ 

E9$ 

530 

MUSIC 

AA$ 

B9$ 

CL$ 

DA$ 

E9$ 

540 

MUSIC 

入 J$ 

BD$ 

C9S 

D J$ 

EDS 

550 

MUSIC 

AE$ 

BE$ 

C9S 

DK$ 

EE$ 

560 

MUSIC 

U$ 

BD$ 

C9S 

DJ$ 

EF$ 

570 

MUSIC 

AGS 

BG$ 

C9$ 

DI.$ 

ECS 

580 

MUSIC 

AH$ 

B!l$ 

C9$ 

DM$ 

EH$ 

596 

MUSIC 

AI$ 

BIS 

C9$ 

DI$ 

EI$ 

600 

MUSIC 

Al$ 

Bl$ 

C2$ 

D3$ 

EJ$ 

610 

MUSIC 

A2$ 

B3$ 

C2$ 

D4$ 

EK$ 

620 

MUSIC 

Al$ 

Bl$ 

C2$ 

D3$ 

EJ$ 

630 

MUSIC 

A2$ 

B4$ 

CMS 

D4$ 

EK$ 

640 

MUSIC 

AK$ 

BD$ 

C9$ 

DJ$ 

EDS 

650 

MUSIC 

AL$ 

BE$ 

C9S 

DK$ 

EES 

660 

MUSIC 

AK$ 

BD$ 

C9$ 

DJ$ 

EF$ 

670 

MUSIC 

AMS 

BG$ 

C9$ 

DL$ 

ECS 

680 

MUSIC 

Al$ 

Bl$ 

C2$ 

D3$ 

EJ$ 

690 

MUSIC 

A2$ 

B3$ 

C2$ 

D4$ 

EK$ 

700 

MUSIC 

入 1$ 

Bl$ 

C2$ 

D3$ 

EJ$ 

710 

MUSIC 

A2$ 

B4$ 

CN$ 

D4$ 

EK$ 

720 

MUSIC 

AK$ 

BD$ 

C9$ 

DJ$ 

EDS 

730 

MUSIC 

AL$ 

BE$ 

C0$ 

DK$ 

EES 

740 

MUSIC 

AK$ 

BD$ 

C9$ 

DJ$ 

EF$ 

750 

MUSIC 

入 M$ 

BG$ 

C9$ 

DL$ 

EG$ 

760 

MUSIC 

Al$ 

Bl$ 

C2$ 

D3$ 

EJ$ 

770 

MUSIC 

A2$ 

B3$ 

C2$ 

D4$ 

EK$ 

780 

MUSIC 

Al$ 

Bl$ 

C2$ 

D3$ 

EJ$ 

790 

MUSIC 

入 2$ 

B4$ 

CPS 

D4$ 

EK$ 

809 

MUSIC 

AK$ 

BD$ 

C9$ 

D J$ 

ED$ 

810 

MUSIC 

入 L$ 

BE$ 

CQ$ 

DK$ 

EES 

820 

MUSIC 

AK$ 

BD$ 

C9$ 

DJ$ 

EF$ 

830 

MUSIC 

AM$ 

BG$ 

C9$ 

DL$ 

EG$ 

840 

MUSIC 

AX$ 

BX$ 

C2$ 

DX$ 

EX$ 

850 

MUSIC 

入 Y$ 

BY$ 

C2$ 

DYS 

EY$ 

869 

MUSIC 

AZ$ 

BZ$ 

CZ$ 

DZ$ 

EZ$ 

870 

MUSICWAIT 

GOSUB4010 


880 

P0KES3C31 

$0,$1D ： GOSUB2670 

890 

MUSIC 

入 1$ 

Al$ 

Al$ 

Al$ 

Al$ 

900 

MUSIC 

D2$ 

B2$ 

CIS 

A2$ 

E2$ 

916 

MUSIC 

Dl$ 

Bl$ 

Cl$ 

Al$ 

El$ 

920 

MUSIC 

Dl$ 

Bl$ 

C3S 

Al$ 

E3$ 

939 

MUSIC 

Dl$ 

Bl$ 

C3$ 

入 1$ 

E4$ 

940 

MUSIC 

Dl$ 

B5$ 

C3$ 

入 1$ 

E3$ 

950 

MUSIC 

D6$ 

B6$ 

C6$ 

入 3$ 

E4$ 

960 

MUSIC 

D7S 

B5$ 

C7$ 

入 1$ 

E3$ 

970 

MUSIC 

D8$ 

B6$ 

C7$ 

入 1$ 

E4$ 

980 

MUSIC 

D7$ 

B5$ 

C7$ 

Al$ 

E3$ 

990 

MUSIC 

D8$ 

B6$ 

C8$ 

A3$ 

E4$ 


1000 MUSIC D7S ； B5$ ； C7$ ： A4$ ； E3$ 
1010 MUSIC D8$ ； B6$ ； C7$ ； A5$ ； E4$ 
1020 MUSIC D7$ ； B5$ ； C7S ； A4$ ； E3$ 
1030 MUSIC D9$ ； B6$ ； C9$ ； A6$ ； E9$ 
1040 MUSIC DA$ ； BA$ ： CA$ ； AA$ ； EA$ 
1050 MUSIC DB$ ； BB$ ； CA$ ； AB$ ； EB$ 
1060 MUSIC DA$ ； BC$ ； CA$ ； AC$ ； EA$ 
1070 MUSIC DB$ ； BD$ ； CA$ ； AB$ ； EB$ 
1080 MUSIC DCS ； BE$ ； CA$ ； AD$ ； EC$ 
1899 MUSIC DB$ ： BF$ ； CA$ ； AE$ ； EB$ 
1100 MUSIC DC$ ； BG$ ； CA$ ； AF$ ； EC$ 
me MUSIC DD$;BH $； CC $； AG $； EDS 
1126 MUSIC D1$ ； B5$ ； CA$ ； A1$ ； E3$ 
1130 MUSIC D6$ ； B6$ ； CD$ ； A3$ ； E4$ 
1140 MUSIC D7$ ； B5$ ； CA$ ； A1S ； E3$ 
1150 MUSIC D8$ ； B6$ ； CA$ ； A1$ ； E4$ 
1160 MUSIC D7$ ； B5$ ； CA$ ； A1$ ； E3$ 
1170 MUSIC D8$ ； B6$ ； CA$ ； A3$ ； E4$ 
1180 MUSIC D7$ ； B5$ ； CA$ ； A4$ ； E3$ 
1190 MUSIC D8$ ； B6$ ； CA$ ； A5$ ； E4$ 
1200 MUSIC D7$ ； B5$ ； CA$ ； A4$ ； E3$ 
1210 MUSIC D9$ ； B6$ ； C9$ ； A6$ ； E9$ 
1220 MUSIC DA$ ； BI$ ； CA$ ； AA$ ； EA$ 
1230 MUSIC DB$ ； BB$ ； CA$ ； AB$ ； EB$ 
1246 MUSIC DA$ ； BJ$ ； CA$ ； AC$ ； EA$ 
1250 MUSIC DB$ ； BK$ ； CA$ ； AB$ ； EB$ 
1260 MUSIC DC$ ； BL$ ； CA$ ； AD$ ； EC$ 
1270 MUSIC DB$ ： BF$ ； CA$ ； AE$ ； EB$ 
1280 MUSIC DC$ ； BG$ ； CA$ ； AF$ ； EC$ 
1290 MUSIC DF$ ； BH$ ； CE$ ； AG$ ； EE$ 
1300 MUSIC QD$ ； QB$ ； QCS ； QA$ ； QE$ 
1310 MUSIC RD$ ； RB$ ； RC$ ； RA$ ； RE$ 
1320 MUSIC DB$ ； BB$ ； CA$ ； AB$ ； EB$ 
1330 MUSIC DA$ ； BC$ ； CAS;AC$ ； EA$ 
1340 MUSIC DB$ ； BD$ ； CA$ ； AB$ ； EB$ 
1 350 MUSIC DC$ ； BE$ ； CA $； AD$ ； EC$ 
1360 MUSIC DB$ ； BF$ ； CA$ ； AE$ ； EB$ 
1370 MUSIC DC$ ； BG$ ； CAS ； AF$ ； EC$ 
1380 MUSIC DG$ ； BH$ ； CF$ ； AG$ ； EF$ 
1390 MUSIC D7$ ； B5$ ； C7S ： A4$ ； E3$ 
1400 MUSIC D8$ ； B6$ ； C7$ ； A5$ ； E4$ 
1410 MUSIC D7$ ； B5$ ； C7$ ； A4$ ； E3$ 
1420 MUSIC D8$ ； B6$ ； CL$ ； AS$ ； E4$ 
1430 MUSIC D7$ ； B5$ ； C7S ； A4$ ； E3$ 
1440 MUSIC D8$ ； B6$ ； C7S ： A5$ ； E4$ 
1450 MUSIC D7$ ； B5$ ； C7$ ： A4$ ： E3$ 
1460 MUSIC DH$ ； B6$ ； CL$ ； A5$ ； E4$ 
1470 MUSIC D7$ ； B5$ ； C7$ ； A4$ ； E3$ 
1480 MUSIC D8$ ； B6$ ； C7S ； A5$ ； E4$ 
1490 MUSIC D7$ ； B5$ ； C7$ ： A4$ ； E3$ 
1500 MUSIC DIS ； B6$ ； CL$ ； A5$ ： E4$ 
1510 MUSIC DJ$;B5$;C7$: 人 4$;E3$ 
1520 MUSIC DK$ ； B6$ ； C7$ ； A5$ ； E4$ 
1530 MUSIC DL$ ； BN$ ； C7$ ； A4$ ； E3$ 
1540 MUSIC DM$ ； B0$ ； CM$ ； A5$ ； E4$ 


1550 MUSIC DL$ ； BN$ ； CH$ ； A4$ ； EG$ ； FH$ 

1550 MUSIC DM$ ； B0$ ； CI$ ： A5$ ； EH$ ： FI$ 

1570 MUSIC DL$ ； BK$ ； CJ$ ： A4$ ； EI$ ： FJ$ 

1580 MUSIC DM$ ； BO$ ； CKS ； A5$ ； EJ$ ； FK$ 

1590 MUSIC DL$ ； BN$；"" ； Aff$ ； EW$ 

1600 P0KE$3B7D,$21,$F2,$37 

1610 MUSIC DM$ ； BO$ ； CO$ ； AX$ ； EX$ ； CO$ 

16 2 0 MUS!C DL$*DM$+DN$ ； BN$ + BO$^ BN$ ； CP$^CQ$fCP$：AYS + AZS^AYSIEYJ^E 
Z$*KY$ ； CP$+CQ$+CR$ 

1630 FOR I-$1E TO $2A 
mo FOR 01 TO $FF STEP 3 
1650 P0KES3C31,0,I 
1660 NEXT 0 
1676 NEXT 1 

1680 P0KE$3C31,$A5,$22 

1690 CCOLOR ,,7 ： PR1KT "END*：EHD 

1700 REM 

1710 A 1 $ VI 2O2S0M5#Al«A#A«A«A#A<fA«ABBBBBBBB#A#A#A#A«A»A#A#ABBBB 
BBBB 

17 2 0 Cl$ VJ 00 630 M1B3B1BB3B1BB3B1BB3B1BB3B1BB3B1BB3B1BB3B1B 
17 30 D 1 $ "VI2O4S0M20R9R 

1740 E1$="V11O1S0M12G3+GRGG+C8CC4CRGG+GRC 

1750 F1$V15O3S0M1G1R4G1R4G1RHG1R4G1R4G1R4G1R4G1R4 

17 6 0 A2$="FFFFFFFF#F«F»FttF#F#nfF#FFFFFFFFF#F#F«F#F«FirF#F#F 

1 770 B2$ "R9R 

1780 C2$ M1V10B3B1BB3B1BB3B1BB3B1BB3B1BB3B1BB3B1BB3B1B 

1790 E2$D3+DRDD+DRDD+DRDD+DRD 

1800 F2$-"G1R4G1R4G1R4G1R4G1R4G1R4G1R4G1R4 

1810 A3$°~V1202S6M1«A7B#AB 

1820 D3$-"VI2O4S0M26F6D3G6D3F6D3G6D3 

1 830 D4$-"C6-A3D6-A3C6 - 入 3D7*" 

1840 A5$--O3S0M7G3G1GG3G1GG3G1GG3G1GG3G1GC3G1CG3G1GG3G1G 
1850 D5$^"S0M9O3G2ROF3G2R0#A2R0R7»D3B6F3R6 
1860 E5$«'G34GDFR+FD+DC+CC+CR+DD+F' 

1870 D7$»"G2R0F3G2R08A2R0R7»D3RRF3B7 
1886 A8$-"VI0O2S0M12#A3#G#A+#CR^CR#G8#A#A8 
1890 AT$-"V14O2SOM20 C5G5R3A5RG8R3 
1900 B8$='V10M12O3D3CDFRERCRDD8 
1910 BT$="V14O2S0H20 G3F5«A7F6G8 

1920 08$='VI0B3B1BB3B1BB3B1BB3B1BB3B1BB3B1RM2V1SBBBBBBBR 
1930 D8$'O2S0M12D3CDFRERCRDD8 
1 9 4 0 E8$-"01G3 + GGJJDRDRDRCC8 

19 5 0 A9$-"V 13S0M6O2R5G3A#A + C + D + iTDfDl + #D + D8R3 
1960 B9$-" V 10S0M9O2D9D 

1970 C9$- - M1VI503G506H2B03M1G06M2B03M1C0 6112803 H1G06H2B 
1980 D9$=-V10S0M9O2G9F 

1 9 90 E9$-**-A 1RG3-A1RG3RG-A1RC3-A1RG3-A1RG3RG-A1RG3 
2000 AA$="R5+C7D3V12DV13#DV12«DV13+C«A5+C 

20】0 DA$-"<tD9F 

2020 CCS-"VI503G 506803 G06B03C06BB1BBBBBBR 

2030 AD$-'03M8#A3AGF5DFG3G7A5 

2040 BD$="O2H6V10G6FR3D5C3C7D5 

2050 DD$-"«A6AR3F5#D3«D7F5 

2060 ED$--V11M20G6F7D5C3C5C3CD3D 

2070 FD$ ， G3GGGGRGGGGGGGRGG 

2080 AE$-"#A3AGF5D3F+D8R3+C5 

2090 BE$-"G6FF5«D8F5 

2100 DE$="#A6AA5G8A5 

2116 EE$=-G6F6F5#D7#D5F 

2120 EF$-ED$ 

2130 AG$- _ »A3AGF5D3F+D7R3+#F7 

2146 BG$-'G6FF5#D7D 

2150 DG$- M «A6AA5G7#F 

2160 EG$-'G6F6F5#D1R#D3^D1B#D3D5«P 

2170 AH$-**V13S0M2 0O2R5G3ABO3CD7-B3CD»DFG 

2180 A1$-'#A6AF3DG6#F7R 3 

2190 BUS- - VI3S0M20O2G7G3ABO3CD7-B3CD«D 

2200 B1$-"»D6-»A7R3#D6D7R3 

2210 DH$-~V13S0M20O2B8G3AB+C+D7B3+C 

2220 DI$-"G6-D7R3G6»F7R3 

2230 EH$-"M7G3+GG+GR+GG+GF+FF+FR+FF+F 

2240 EI$-"#D3+«DR-«A-»A-»AF-B»D#DDDRD#A-A 

2250 CJS-^Vl503G506B03G06B03G306B1BBBBRBBBBRRBB 

2260 DJ$-"V1202ClFGRGFG#AGFGRAFDFCFG8GFGltAGFG#AAFDF 

2270 DK$- _ G1FGRGFG#AGFGBAFDFGPG8+D+#A+D+C#A+C#AAGAGF 

2280 DL$--GlFGRGFG#AGFGRAFDFGFGR+D+#A+D+C#A+CA#A+C+DfE+#F 

2290 DM$-"+Gl+P+GRV13S0H20O2R5G3AB+C+D7B3+C 

2300 B1$--V15S6M601R9R3#AAFRFGD 

2310 B3$-'R9R3FDC8D0RR4D0RRR 

2320 B4$ * R9R3FDCRD0RR4«F0RRR 

2330 CKS--V1503G506B03G06B03G06BB3BBB 

2340 CLS-'Vl503G 506803 G06B03G06BB1BBBRRBB 

2 350 A J$-*"03MI7lfA3 入 GF5DFG3G7A5 

2360 CM$ パ V10M1B3B1BB3B1BB3B1BB3B1BV15O3G1O6M2RBBRRBBO3IMGO6M2BB 
BBBBR 

2370 CN$»"V10MlB3BlBB3BlBB3BlBB3BlBB3BlBB3BlBV15M2BBBBBO3inGO6M2 
BB 

2380 AK$»"*O3H30»A3A2R0G2R0F5DFG1RC7A5 
2390 AL$»"«A3A2R0G2R0F5D3FS8+D7S0«D6+CS 
2400 AM$-*#A3A2R0G2R0F5D3FS8+DSS0+D6+#F7 

24 10 C0$-"M1 VI50 3G 50 6112 BO 3M1G 06112 B03M1G06M 28031 ilG06M2BlBBE 

24 20 CP$ = VI0M1B3B1BB3B1BB3B1BB3B1BB3B1BB3B1BV1 50 3GR06M2BB0 3H1GB 

06M2BB 

24 30 CQ$>"U1V1 50 3G5 0 6U2B0 3IUG0 6II2B0 3U1G0 6M2BB1BBRBBBB 

2440 AXS-"V12O2S0M20«A7V11BV10«AV9B 

2450 AY$--V8FV7#FV6FV5#F 

2460 AZ$-"V4#AV3BV2«AV1B 

2470 BX$-"V13S0M6O1R9R3#AAFRV12FGD 

2480 BY$=*R9R3V7FDCBD0RR4D0RRR 

2490 BZ$ _R9R3V3 杯 AAFRV2FGD 

2500 CZ$»"H1V9B3B1BB3V7B1BB3B1BB3V5B1BB3B1BB3V3B1BB3B1BB3V1B1B 
2510 DX$="V12O4S0M26F6D3V11G6D3V16F6D3V9G6D3 
2520 DY$ -V8C6-.UV7D6-A3V6C6-A3V5D7 
2530 DZSV4F6D3V3G6D3V2F6D3V1G6D3 

2540 EX$-"V13OlS0M7GlRG3GlRG3V12RG3GlRG3VllGlRG3GlRG3VieRG3GlRG3 
2550 EY$-*V9D1RD3D1RD3V8RD3D1RD3V7D1RD3D1RD3V6RD3D1RD3 
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2560 EZ$ -V5G1RG3GIRG3V3RG3G1RG3V2G1RG3G1RG3V1RG3G1RG3D1RD3 
2570 FZ$ "V15C1R4V13G1R4V11G1R4V9G1R4V7G1R4V5C1R4V3G1R4V1G1R4G1 
2580 FE$"G1R4C1R4G1R4G1S5M1V12AA05CV13ECBV1404CGB05DV!5F06CFB03 

S0M1 

2590 EJ$ 'V13O1S0M7G3GG1RC3RGG1RG3GCG1RG3RGGC 
2600 EKS "D3DD1RD3RDD1RD3DDDIRD3RDDD 


2610 T!$ " 000000- 

2620 SOUND ，（ 7, 0) : SOUND (6, 3) 

2630 SOUND- (15,5) : SOUND- (14,7) 

2640 FOR 卜 0TO30O 

26 50 SOUND^ (4, I) : SOUND =(12,1) 

2660 NEXT：RETURN 
2670 Al$ "V13S0M25O3 
2680 BIS パ V14S8M10O4 
2696 C1$="V15S0M1O3 
2700 Dl$ "V15S8M 3002 

2719 El$- - V15S0M2O1 

2720 F1$='V15S0M1O3 

2730 A2$="O0L1A+AO2A+AO4A+AO6ARRRRRRRRR 
2740 B2$='O0L1RRRRRRA^AO2A+AO4A+AO6ARRR 
2750 D2$='O0L1RRRRA+AO2A+AO4A+AO6ARRRRR 
2760 E2$ "08LIRRRRRRRRRAfA02A+A04AfA06A 
2778 E3$-E1$»"FICFFR5G1DGGR5D1-ADDR5E1-BEERS 

2780 C3$=-O3M1L1CRRCRRRRGRRGRRRRGRRGRRRRGRO6M1B0BBRM 48503 Ml 
2790 F3$-C3$ 

2800 E4$ パ F1CFFR5G1DGGR5E 卜 BEER5A1EA 入 
2816 B5$=B1$*'A7DFG" 

2828 B6$= _ A7DG+C~ 

2830 C6$="03M1L1GRRGRRRRGRRGRRRR06M2BBB03M1GRRRR06U3BBBBBBBR 
2840 F6$-'L1GRRGRRRRGRRGRRRRGRRG06M2BBBRM3BBBBBBBR 
”50 D6 レ R9R8D1EDC" 

2860 D7$» _ -A1RCDD 80704 R1DEDC 
2870 D8$:"-A1RC-A-A8- 入 7 • 入 4R1DEDC 

2880 C7$= _ 03M1G1RRG06H3B503M1G1RRG06M3B503U1G1RRG06H3B503H1C1RRG 


06M3B5 

28 9 0 F7$= -0311 1G1RRG06M 28503111 G1RRG0 6H 28 50 3 MIG 1RRG06H 28303 M1GG1RR 
G06M2B5 n n 

2900 C8$-"03M1G1RRG06M3B503M1G1RRG06M3B503M1G1RRG06M 38503 H1G1RRG 
06M2BV12BV15BV12BV15 

2910 F8$-"03M2G1RRG 068503 G1RRG06B50BG1RRG06B303GG1RRG06V12BV15BV 
12BV15B 

2920 A3$-'R9* + E2$ 

2930 A4S=A1$+"R5 \CAG6E3D7 
2940 A5S--R5-ACEDE3CC7 
2950 A6$-"R5-ACEDC3-A-A5-B 

2960 C9$--03M1G1RRG06M3B503H1G1RRG06M 38503 MIG1RRG06M2G1GGRM3BRBR 
BBBR 

2970 F9$-'03M1C1RRG06M2B503H1G1RRG06M2B503M1G1RRG06M1G1GGRH3BRBR 


BBBR 

2980 D9$="-A1RC-A-A8-A8V12-G5 

2996 E9$="F1CFFR5G1DGGR5E1-BEER5-A1R-AR-B-B-BR 
3000 AA$='C8R5R9 
3010 DA$-'02V11S8C9C 

302® BA$--S0M2OV12O2E8R5 V14G5E3D6C5 

3030 EA$-"S0M1O2V12E1CEGGCEGEECGCGCEGCECECCGGEECCEGE 

3040 CAS-"03M1G1RRG06M 38503 H1G1R406M3B503H1G1RRG06M3B503H1G1RGR0 


30 5 8 FA$-"0 3M1G1RRG06M 2 830 3 H1G1RGR406M 2 8 303 MIC1RGRRG06M 28 303 MIG 1 

RGRGR06M2B5 

3060 EB$="AlFAtC+CFA+CAAF+CF+CFA +C+CAFAFF+C+CAAFFA+CA 
3070 BB$="S8-A7S0M5-A3EEM20ED9 
3080 AB$='O3S0R9R6A5G3E5 
3090 DB$-"02F9F 

3100 FB$--03H1G1RRG06M 2830 31 MG1RGRRR0 6M 283031 11CIRC1RRG06H 28 303 HI 


3110 CC$="03M1G1RRG06M 38504 H2E1EERV12DDDRV15EEEEEEEEDRRR 06113 BBBB 
3120 FC$"03M1G1RRG06M 28303 MIG1R04M2V12E1EERV15DDDREEEEEEEEDRRR0 
6BBBB 

3130 DC$-'E9E 


3146 DD$=*F8G8R7 

3150 EC$-'G1EGBBEGBGGEBEBEG BBCECEEBBGGEEGBC 

3166 ED$" _ A1FA+C+CFA+CAAF+CG+DGB ^D+DBGBGG+D+DRRRRRRR 

3170 ED$-"A1FA+C04S8E3-A5C3G802E3«DD#C 

3180 AC$ "C9R 

3190 AD$= _ D9R 

am KE$ "R9R6E5D3C5 

3210 AFS-*-G9R 

3220 BC$-•R9G3RE2R0D6C5 

3230 BD$="-A8ER5E 

3240 BE$-"D5E3S8G6S0G9E5 

3250 BF$="D6-AE8R5E5 

3260 BG$-"D5E3A5A3G8R5E 

3278 BH$='D5E3-A5C3D8R7 

3288 AG$ "S8R505E3-A5C3G8R7 

3290 CD$="03M1L1CRRG06M3B503H1G1RRG06M3B503M1G1RRG06M3B04M2EERV1 
2DDDRV1508M3BBBB „ … 

3300 FD$^ "0 3M 111GRRG0 6M 28 5 03 MIG1RRG0 6M 28503 MIG1RRG06M2B5VI5D1DDR 
V 1506BBBB 

3310 B1$='S0M20V12O2E8R5 V14C4E1E3D6C5 


3320 BJ$ "R9G5E3D6C5 

3330 BK$ ■- A8-A3E8R3E5 

3340 BL$D5E3S8G6S0G9E2R0E3 

3350 DF$-'F8S8SA9R5 

3360 EE$ 'A1FA+C04S8E3 A5C3C8R7 

3370 CE$ 03M1G1RRG06M 38 50 3 Ml G1RRR 0 61138 50 3 H1G1RRG0 4M2EEERVI2DDDR 
06M3V15BBRB 

3380 FE$ 03M1G1RRC06M 28303 M1C1RGRRR06M 28303 M1C1RGRRCVI206M3B04M 
2EERV1 5DDDR06M3BBRB 

3390 AH$ 04S8B1#AV9A#GV7G#FV5FEV3#DDV1»CRR5R9V13 

3400 BM$ "S0M20V11034C1BV9»AAV7#GGV5»FFV3E»DV1D»CR5V1402C5E3D6C5 

3410 QA$ 'LEFTS (AH$,34) : RA$-MID$ (AHS,35) 

34 20 QB$ LEFTS (BM$,41) : RB$ MID$ (BM$,42) 

34 3 0 QC$-LEFTS (CAS,2 9) : RC$* MID$ (CA$,30) 

34 4 0 QE$-LEFT$ (EA$,26) : RES-MID$ (EA$,27) 

34 50 QF$ LEFTS (FAS,38) : RFS-HIDS (FAS,39) 

3460 QD$ - '02V11S8+C1BV9#AAV7#GGV5#FFV3E#DV1D#CB5V11 
34 70 R D $- ' 0 2 C 9 

3480 EF$ 'A1FA*C04S8E3-A5C3G8R7 

3496 CF$ 03M1G1RRG06H3B303M1G1RGR404M2D1DV12DV15REEEEEEEEERRR06 
M3BBBB 

3500 FF$-*03M1G1RRG06M 28303 MIG1RGR404M2V12D1DV15DREEEEEEEEERRR06 


M2BBBB 

3510 FG$- LEFTS (FB$, LEN (FB$) -5)t"V 1306M5A 1AAAV 15 
3520 DGS-T8G8R5V15S80 2D1EDC 

3530 DH$="-A1RC-A-A7-A3 G 1#GA4^G1A4#G1A5 03D1EDC 

3540 DI$--02A1R+CAV14A7V13A3G11TGV12A4»G1V11A4#G1A5V10O3D1EDC 

3550 DJ$-"-AlRCDV9D8V8D7V7D4RlV6DEDC 

3560 DK$^-A1RV5C-AV4-A6V3-A6V2-A7V1-A4 

3570 BN$ 'V14S0M20O4A9F 

3580 DL$-* ， V8S0H20O4 + C7V14D9G7 

3590 B0$="A9G 

3600 DM$-~V8G7V14D9+C7 

3610 EG$-"V14S0H2O1F1CFFR5G1DGCR5V13D1-ADDR5E1-BEER5 
3620 EH$«"V12F1CFFR5G1DGCR5V11E1-BEER5A1EAAR5 
3630 EI$-"V10F1CFFR5G1DGGR5V9D1-ADDR5E1-BEEB5 

3640 CH$-"03M1G1RRG06M3B5V1403M1G1RRG06H3B5V1303H1G1RRG 06113 B5V12 
03M1G1RRG06M3B5 

3650 CIS- VI103M1G1RRG06M 38503 MlGlRRG06M3B5Vie03MlGlRRG06M3B503M 
1G1RRG06M3B5 

3660 CJ$-'O3M1G1RRGO0M3B5V9O3M1G1RRGO6M3B5V8O3M1G1RRGO6M3B5O3M1G 
1RRG06M3B5 

3670 CK$ -03H1G1RRG06M 38503 H1G1RRG06M3B504M2E1EERDDDRDDDR06H3BBB 
B 

3680 FH$ -03M1G1RRG06M2B5V1403H1G1RRG06H2B5V1303H1G1R8G06M2B3V12 


03MIGG1RRG06M2B5 

36 9 0 FI$-"V1103M1G1RRG06M 285031 11G1RRG06M2B5V 180 3H1G1RRG06M2B303H 
1GG1RRG06M2BS 

3700 F J$ '03M1G1RRG06M2B5V90 3M1G1RRG0 6M2B5V80 3M1G1RRG0 6M2B30 3H1G 

G1RRG06M2B5 

3718 FK$ ^OSMIGIRRGOBH 23 503 MIG 1RRG06M 28504 M2E1EERDDDRDDDR 06112 BBB 
B 

3720 CLS-"0 3M1G1RRG0 6M3B50 3M1G1RRG0 6H 38503 MIG1RRG06H 385041 (2E1EEV 
12E06M3V15BBBB 

3730 FL$ "03M1G1RRG0BM2B503H1G1RRG06M2B503M1G1RRG06H 28303 H1G1R04 
M2EEV12EV15E06M2BBBB 

3740 CM$=-03M1G1RRG06M 38503 MIG1RRG06H 38504 M2E1EERDDDRR506M3B1BBB 

3750 FM$ -03H1G1RRG06M 28503 M1G1RRG06M 28504 M2R5D1DDRDDDR06M2BBBB 

3760 EJ$-"V8F1CFFR5V7G1DGGR5V6E1-BEER5V4A1EAAR5 

3770 BP$-"V12A9V10F 

3780 CP$-"E7-GCD 

3790 COS--O4S0M7E7-GCE 


3800. BQ$="V8A9V6G 
3810 CQ$-CO$ 

3820 CR$-CP$+"9 

3830 DH$-DL$+"V8G5 

3840 AWS-'V13S0M12O3R5-A7A7R3E7R3 

3850 AX$- M R5-A7EE5A7 

3860 AY$-"R5-A7A7B3E7R3 

3870 AZS--R5-A7EE5A7 

3880 EWS-"V13S0M12O3R5-AC7GD7 

3890 EX$~"R5-AC7D6C7R3 

3900 EY$-"R5-AC7GD7 


3910 EZ$-"R5-AC7D6C7R3 
3920 TfS=-000080" : RETURN 
3930 INIT'CRTJG* •: CLS3 ： CC0L0R,,4 
3940 CURSOR 8,10 

3950 PBIHT[2]-T E C H N 0 P 0 L I S" 
3960 CURSOR 7,13 

3970 PRIHT*Y ELLOW MAGIC" 

3980 CURSOR 10,16 

3998 PRINT*0 R C H E S T R A" 

4000 RETURN 
4010 CURSOR 8,16 
4 0 2 8 PRINT SPC (21) 

4030 CURSOR 12,10 

4040 PRIHT[5]-K A I - K 0 H" 

4050 CCOLOR,,6 
4060 GOTO3960 


リスト 2 AFTER BURNER 音色定 _ 


10 1 

After Burner 

by 

SEGA 

20 1 

Sound data 



30 1 


by 

S.Kaneko 

40 J 




50 * 


in 

27th Feb 

60 1 





70 CLR : RESTORE 190 : GOSUB "Set tone" 

80 RUN "After Burner" 

90 1 

100 , 11= コンコン 12 二 Bass I3=D-Guiter I4=B-Drum 

110 » I5=Snare 16 = チヤラチヤう I7=Strings l8=Hi-Hat 
120 ' I9=I-Guiter 


130 Oh! X 1988.7. 


►確か， 3 年ほど前だろうか。 PSG のエンベロープをいじくつて出た茂に感勋していた 
のは…… 〇 マドンナ，安仓地帶など多くの1111をスコアとにらめつこして猫#していた。そ 
して3年後の税在，なんだ，この進歩の速さは！ ぼい，なんていい疗を出すんだ。 

大石信雄（⑻東京都 





180 * 

190 DATA FC 
200 DATA 12 
210 DATA 80 
220 DATA 9A 
230 DATA 00 
240 DATA 00 
250 DATA 37 
260 DATA 01 
270 DATA 05 
280 DATA FC 
290 DATA 11 
300 DATA 80 
310 DATA 59 
320 DATA 00 
330 DATA 10 
340 DATA F5 
350 DATA 07 
360 DATA 80 
370 DATA E4 
380 DATA 01 
390 DATA 80 


130 1 

140 LABEL "Set tone" 

150 FOR I=0TO20 : READ A$ : FOR J=0TO15 ： X=VAL("&h M +MID$(A$,1+3*J,2)) 

160 POKE &HB190+J+I*16,X : Z=Z+X : NEXT J : NEXT I 

170 IF Z=18190 THEN RETURN ELSE PRINT'.DATA ERROR" : STOP 
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>C" 

180 

190 


200 

"P-In" 

"P-In4" 

"P-In3" 

210 

••P-A" 

"P-A2” 

"P-A，" 

220 

"P-A ，.， 

"P-A2" 

"P-A 1 " 

230 

， ’ P_B" 

"P-In2" 

"P-In4" 

240 

"P-B2" 

"P-B3" 

"p_B4 .， 

250 

260 

"P-B5" 

"P_En" 

"P-A4" 

"P-B7" 


After Burner by SEGA 

Music data 

by S.Kaneko 

in 27th Feb. 88» 

CLS 0 : TEMPO 0 : TIME=0 
VWORK=&HAE69 : TCMD=&HAC40 ： OFST=0 

IF PEEK(VWORK) THEN TCMD=&HAC3F ELSE VWORK=&HAE7C ： OFST=3 

POKE TCMD,&H18 : POKE TCMD+1 ， & H1B 

CTC=PEEK( &.HA9D7+OFST > *256 + PEEK ( &HA9D6+OFST) 

OUT CTC,7 ：OUT CTC,4 

R5$ = "Y33, 188" : C5$ = "Y33,252" : L5$ = "Y33,124" 

R6$= M Y36, 147" ： C6$="Y36,211" : L6$="Y36,83” 

Dl$ = "04 A>GA<A>E.G<A>DE<A>CD<A>C<BG" 

E$ = R6$ + ， , CEGA" + L6$ + "CEGB ,, +R6$ + ,, EGA>C ,, +L6$ + ,, <EAB>D ,, +R6$ + "<EGB 
E1$=E$ + L6$ + "<GB>DF ,, +R6$ + "<A>CEG ,, +L6$ + "<A>CEA"+C6$ 

» 

"P-In5" 

"P-A3" : "P-A5” 

"P-A3" : "P-A5" 

"P-In3” 

， .P_B3," 

"P-B6" : "P-A4" 


270 * 

280 IF TIME>315 THEN 290 ELSE PAUSE 10 : GOTO 280 
290 FOR 1=1 TO 25 

300 POKE VWORK+1,(PEEK(VWORK+1)-4) 

310 POKE VWORK+9 ,(PEEK(VWORK+9 )-3) 

320 POKE VWORK+ 13,( PEEK(VWORK+13)-3) 

330 PAUSE 1 : NEXT 

340 END 
350 » 

360 LABEL "P-In” * RESCUE LUCY FROM MATCH ， S HANDS 

370 A$="T82 V121 0014 L8 R«8E-4" 

380 B$=" ： V127 0315 L8 R«8D4" 

390 C$ = ":VU7 I2L8" 

400 D$=" ： V115 I1L8" 

410 E$=" : I7L8" 

420 F$=" ： I7L8" 

430 G$=":I7L8" 

440 H 拿： " ： I8L8" 

4 50 "!" r 0 

460 A$="O0 E-4E-4E-4E-4 E-4E-4E-4E-4" 

470 B$=":03 R«1792 DD” 

480 C$ = " ：03 A AAA AAAA AAA A@43A«42A«43 AAAA'* 

490 D$ = ” ：，.+DlC 
500 ， . ！， • ， 1，2 

510 B$="：04 R1 D+16D+16 く D>R D16D16 く DR DD" 

520 "!" ， 3,4 

530 B$="：03 R«1792 DD" 

540 " ! M *1,2 

550 B$= n : T8104 R01152 L16 DDR8DD RB32B32BB GGD8 L8" 

560 H$="：04 R VI10E V113E V115E V119E V123E V127E V126E V125 EEE 
B EEEB" 

570 " !" *5,6 » MATCH IS APPROCHING 

580 LABEL n P-In2 ，， ， EQUIP ENOUGH MISSILE ! 

590 A$="O0 E-E-R4 E-E-R4 E-E-R4 E-.E-.E-” 

600 B$ = "：03 R4D4R4D4 R4D4"+R5$ + "D.+L5$ + M D."+R5$ + M D"+C5$ 

610 C$=" ： V117 03 AAAA AAAA AAAA AAGA" 

620 D$= ": V112 I1 M +D1$ 

630 E$ = .•: V106 0517 q5A4<I9q8A4RA4GAe496 R016>I7q5G.G.A" 

640 F$=" ： V106 05I7q5E4<I9q8E4RE4DE@496 R@16>I7q5D.D.E" 

650 G$= ": V107 0417 q5 A4R®1280 G.G.A" 

660 H$ = *' ： V124 04 EEEB EEEB EE EE E8.E8.E8" 

670 "!，. ， 7,8 

680 LABEL "P-In3 ，， 

690 C$ = ，•： 03 AAAA AAAA AAAA AB>C<G" 

700 E$="：04 R4I9q8A4RA4GA«496 R@16>I7q5A.A.G" 

710 F$=":04 R4I9q8E4RE4DE«496 R«16>!7q5E.E.D u 


720 G$="：04 Rl.A.A.G" 

730 H$="：04 REEB EEEB EE EE E8.E8.E8" 

740 "! ，，， 9,10 

750 C$="：03 GGGG GGGG GGGG GGGG" 

760 D$="：04 G>G-G<G>EG-<G>DE<G>D-D<GBAG-" 

770 E$ = ..:04 R4I9q8G4RG4FG@496 R<816 > 17q5F. F. G" 

780 F$=":04 R4I9q8D4RD4CD@496 R@16>I7q5C.C.D" 

790 G$ = '* ：04 Rl. F.F.G" 

800 "!" *11,12 

810 RETURN 

820 LABEL "P-In4" 

830 C$ = •，： 03 GGGG GGGG GGGG GGAB" 

840 E$= M ：04 R4I9q8G4RG4FG@496 R@16>I7q5G.G.A" 

850 F$ = " ：04 R4I9q8D4RD4CD@496 R@16> I7q5D. D .E*' 

860 G$="：04 Rl.G.G.A" 

870 "!” ， 13，14 

880 A$= M O0 E-E-R4 E-E-R4 E-E-R4 E-.E-.E-" 

890 B$ = " ：03 R4D4R4D4 R4D4 ,, +R5$+"D. "+L5$ + "D. "+R5$ + ' , D"+C5$ 
900 C$=":03 AAAA AAAA AAAA AAGA" 

910 D$ = ” ： .’+D1$ 

920 E$="：04 R4I9q8A4RA4GA@496 R@16>I7q5G.G.A" 

930 F$="：04 R4I9q8E4RE4DEd496 R@16>I7q5D.D.E" 

940 G$="：04 Rl. G.G.A" 

950 "!" ， 7，，8 

960 RETURN 

970 LABEL ”P-In5" 

980 A$="O0 E-E-R4 E-E-R4 E-E-R4 E-.E-." 

990 B$="：03 R4D4R4D4 R4D4D.D." 

1000 C$="：03 GGGG GGGG GGGG GG” 

1010 D$=":04 G>G-G<G>EG-<G>DE<G>D-D<GB" 

1020 E$="：04 R4I9q8G4RG4FG«496 R@16>I7q5G.G.R" 

1030 F$=":04 R4I9q8D4RD4CDS496 R«16>l7q5D.D.R" 

1040 G$=":04 Rl. G.G.R" 

1050 "!" ， 13，15 

1060 A$="O0 E-4BE-4E-E-" 

1070 B$=":03 R2D4R4.DR4.D" 

1080 C$="：03 EEEE EEEE EEEE EEEE" 

1090 D$ =，. ： I7" 

1100 E$="：05 ER8640EE" 

1110 F$="：04 A-R«640A-A-" 

1120 G$ =，，：04 ER0640EE" 

1130 H$=":04 L8 E4EE E4EE E4EE E4EE" 

1140 "!•• » 16,17 

1150 A$="O0 E-4RE-4RE-E-" 

1160 B$="：03 RDR2.RDRDRDDD 
1170 C$="：03 EEEE EEEE EEEE EG4." 

1180 E$=":05 RER4ERe640EER" 

1190 F$=":04 RA-R4A-R0640A-A-R" 

1200 G$=":04 RER4ER«640EER" 

1210 "!" ， 18，19 

1220 RETURN 

1230 LABEL "P-A" 1 MATCH RUNWAY TO THE NORTH! 

1240 PLAY ": : : : 13:13:13" 

1250 LABEL "P-A，" 

1260 A$ = *'O0 E-E-R4E-4R4E-4R4E-E-R4" 

1270 B$=":03 R4D4R4D4R4D4R4D4" 

1280 C$=" ： V11103 AAAA AAAA AAAA AB->C<B-&+" 

1290 D$ = " ： VU0 06 D«32E«1760<A>C" 

1300 E$=":V94 03Q7 AAR»640A R4.AR" 

1310 F$= ": V92 03Q7 EER@640E R4.ER" 

1320 G$ = ":V94 02Q7 AAAA AAAA AAAA AB->C<B-.. 

1330 H$="：04 EEEB EEEB EEEB EEEB" 

1340 •，！" ， 20，21 

1350 C$=":03 B-B-B-B- B-B-B-B- B-B-B-B- B-AFG&+" 

1360 D$="：06 Dei4E«370D« 128 0" 

1370 E$=":03 B-B-R0640B-R4.B-R" 

1380 F$ =，，：03 FFR«640FR4.FR" 

1390 G$="：02 B-B-B-B- B-B-B-B- B-B-B-B- B-B-B-B-" 

1400 "!" *22,23 

1410 C$ = "：03 GGGG GGGG GGGG GAB-F .， 

1420 D$=":06 D@26Ee358D4.F@896F@24G«104FE" 

1430 E$="：03 GGR0640G R4.GR" 

1440 F$ =，，：03 DDR»640D R4.DR" 


►え一い，なんなんだ？ 2浪には人権はないのか？ 2次#集で滑りこんだ奴とか，あ 
きらめて専門学校にいった奴とか友だちにいるけど，俺は大学に行きたいんでい！ 来年 
こそは……って昨年も同じこといいながらこれ書いてたような気もするけど。大学入った 
ら免許取って，ビデオ買って……。 田中正志 （19) 千葉県 


10F005F 00102605600300 
90D0030C 0905000040000 

30F 00710004 E414E 02200 
10D 8000400 F101F 040000 

B 009110 E0F 00701020710 
180340080900 F 50090100 

F0D 9110 D0E0B321B 60420 
101140 F 08501 F70F1 8100 

C0F9110C0C 01501188910 
10214001050273000 C100 

C0D9152A0F 05821240440 
1012400 1D102F 30000100 

6714020 F 0081030060070 
0F 40280100 F 40300100 F0 

0406522 F 03920 C5EA0060 
2F40D8B101D00E 09100 F0 

8756018 E 00840028 A0070 
0F4008C100F0000C100F0 

D 467020 F 00130280 A 0060 
IF 40080100000000100 F0 

15080 F1 07100 E 04058200 
70080980300000100 F700 

65090 F 078003 A0A01A010 
70E 08580 C08D 08501 B700 

10 060 F3BE1 004840 B2210 
30000902 F0001C1 017300 

60070 F00DC0040B0F2052 
30000100 F0C 0105003300 

010F0050A0F0C 00700040 
010900340080900000000 


Oh!X LIVE in '88 131 
















1450 

1460 

1470 

1480 

1490 

1500 

1510 

1520 

1530 

1540 

1550 

1560 

1570 

1580 

1590 

1600 

1610 

1620 

1630 

1640 

1650 

1660 

1670 

1680 

1690 

1700 

1710 

1720 

1730 

1740 

1750 

1760 

1770 

1780 

1790 

1800 

1810 

1820 

1830 

1840 

1850 

1860 

1870 

1880 

1890 

1900 

1910 

1920 

1930 

1940 

1950 

1960 

1970 

1980 

1990 

2000 

2010 

2020 

2030 

2040 

2050 

2060 

2070 

2080 

2090 

2100 

2110 

2120 

2130 

2140 

2150 

2160 

2170 

2180 

2190 

2200 

2210 

2220 

2230 

2240 

2250 

2260 

2270 

2280 

2290 

2300 

2310 

2320 

2330 

2340 

2350 

2360 

2370 

2380 

2390 

2400 

2410 

2420 

2430 

2440 

2450 

2460 

2470 

2480 

2490 


G$=":02 GGGG GGGG GGGG GGGG" 
"!" *24,25 
RETURN 

LABEL "P_A2" 


2500 


LABEL "P-A5" 


03 FFFF FFFE EEFG >DC<BG 
06 E2RDC<Beil52" 

03 FFR6640E R" 

03 CCR0640<B R" 

02 FFFF FFFE4EFG >DC<BG" 

,26,27 
RETURN 

LABEL "P-A3" 

=..00 E-B-R4E-E-RE- RE-R4E-E-E-E-" 

= H ：03 R4D4R4D4 R 40404 DD" 

="：03 FFFF PFFE4EFG>DC<BG" 

=":06 E2RDC<B4B>CDEDC<A&+" 

=":03 FFR0640E Q8 Re896F&+" 

=..:03 CCR0640 く B Q 8 R@896>C&+" 

="：02 FFFF FFFK4EFG >DC<B Q 8 F&+” 

!" *26,28 

二" 00 RE-R4E-E-RE- RE-R4E-E-RE-" 

= M ：03 R4DR4.DR4.DR4.DR" 

=..:03 FFFF FFFE4EEEEFGA&+" 

=" ：〇5 Ae640GEBe811>C@171C010Dei60 H 
=":〇3 F2.REe640RGRA4+" 

="：03 C2.R く B@640R>DRE&+" 

二"： 02 F2.RE@640RGRA&+ M 
!" *29,30 

=":03 AAAA AAAA AA>E<B >C<BGF 
=":06 Ce640<B4Ee896EG@8A@120&+" 

= ":03 A1R>DRCR<G4F4.+ " 

= ":03 E1RBRARD4C&+.. 

="：02 A1R>DRCR<G4F4+" 

!•• ’31,32 

=":03 FFFF FFFK4EEB EFGA&+" 

=" :〇5 A@640GEB2.>CDC&+ n 
=":03 F2.REe640RGRA&+" 

=•， i03 C2.R く B0640R>DRE&+" 

=":02 F2.REe640RGRA&+" 

!" *33,34 

=":03 AAAA AAAA AAAA AAAA" 

= M ：06 C<B4Aei280>CEG«8Aei20fc+" 

=":03 A0" 

=":03 E0" 

=":02 A0" 

!•• ，35,36 

="00 RE-RE-RE-R4E-RE-E-E-E-4R" 

=，，：03 R4DRDR4DRBGDDR4D16D16" 

=":03 AAAA AAAA AAAA A>C4." 

=":06 A«1792 VI11 RC@8Dei20&+" 

= ": V110 04L16I6"+E1$ 

=":03 AR4AR4AR4.AR4>C4. H 
= .，：02 AR4AR4AR4 . AR4 >C4 . M 
!" *37,38 

=..00 E-E-RE-E-4RE- B-E-RE-E-4RE-" 

=":03 R4D4R4D4 R4D4R4D4" 

04 DDDD DDDD DDDD DED<A&+" 

=":06 D<A>E<A>F<A>G<A>A<A>B<A>>CC®16D@240C4+" 
= ":V98 0413 L8 D4RDD4RDRDRDDE4 <A" 

=":03 A4RAA4RARARAAB4E" 

= ":03 D4RDD4RDRDRDDE4<A" 

!" ’39,40 

=":03 AAAA AAGA AAAA A>E<B>C" 

=":〇7 Ce640<BAElCe8D@120&+" 

="••03 R4.AA4 RARARAR>C4 ." 

= "••03 R4.EE4 RERERERA4 . M 
= M ：02 AAAAA4 RARARAR>C4." 

!" ，41，42 
LABEL "P-A4" 

=":04 DDDD DDDD DDDD DED<A4+" 

=，• ：06 D<A>E<A>F<A>G<A>A<A>B<A>>CC«16D@240C&+" 
=":04 D4RDD4RDRDRDDE4 く A" 

= .，：03 A4RAA4RARARAAB4E" 

= ":03 D4RDD4RDRDRDDE4<A" 

!" »39,40 

03 AAAA AAGA AAGA >DC<BG" 

07 C«640<BGGe8Ae760B>C<Bfc+" 

03 R4.AA4 RARARARG4." 

03 R4.EE4 RKRERERD4." 

02 AAAAA4 RARARARG4." 

•43,44 

00 E-E-RE-E-4RE- RE-RE-E-E-RE-" 

03 FFFF FFFG4GGG GGGE&+" 

06 B4.RAB>CC«8D@760C<B>D»8Eei20&+" 

03 F2.RG0896RE&+" 

03 C2.RDe896R<B&+" 

02 F2.RG«896RE&+" 

*45,46 

00 RE-RE-E-4RE- RE-RE-K-E-RE-" 

03 R4D4R4D4 R4D4R2" 

03 EEEE GGFE4EEE EG4F&+" 

07 B»1664DC<B&+ , * 

03 ER1.GRF4+" 

02 BR1.>DC4+" 

02 EEEE GGFEe640GGRFA+" 

!" ’47,48 

="00 E-E-RE-E-4RE- RE-RE-E-E-RE-" 

=":03 R4D4R4D4 R4D4R4D4" 

=":03 FFFF FFFG4GGG GEGAi+" 

=":06 B4.RAB>C<B«640RG4G@8A®120&+" 

="：03 F2.RG2.R4AA+" 

=":03 C2.RD2.R4E&+" 

='• ：02 F2.RG2.EGA&+.， 

'49,50 

RETURN 


C$= 
D$ = 
E$ = 
F$ = 
G$ = 


2510 A$="O0 RE-RE-E-4E-4 E-4R4E-4E-4" 

2520 B$ = ”：03 R4D4R4D16D16D16D16 D4R4B32B32B16G32G32G16D4 
2530 C$ = *' ：03 AAAA AAAA AR" 

2540 D$=”：06 A@1152R" 

2550 E$="：03 A1AR" 

2560 F$ = ，，： 03 E1ER" 

2570 G$=":02 A1AR" 

2580 H$=":04 EEEB EEE16E16B16B16 E4R2•" 

2590 "!" ，51，52 

2600 RETURN 

2610 LABEL "P-B" 1 MATCH»S WEAPON IS BREAD AND OIL 

2620 A$= M T82 00 E-4E-4E-4E-4 E-4E-4E-4E-4" 

2630 B$= ":" 

2640 C$=":V115 03 AAAA AAAA AAAA AAAA" 

2650 D$= ，，： V116 I1"+D1$ 

2660 E$ = "：" : F$ = " ： " ：G$ = "：" : H$ = ":" 

2670 "!，，，53,54 

2680 " ； " : *»; u 
2690 B$ = " ：R@ 128004 RDDD*' 

2700 H$=":04 R V110E V113E V115E V119E V123E V127E V126E V124 
E4E4E4" 

2710 "!" ，55,56 

2720 A$="T83 00 E-4RE-E-4R4 E-E-RE-E-4R" 

2730 B$ =，，：03 R2.D4 R@640GD4" 

2740 C$ = .•: V107 03 F4RFF4R4 F4RFF4F4" 

2750 D$="：V110 0617 D2.C4 D4.E4.C4" 

2760 E$ = •，： V95 03R4CRFRGR R4CRFRGR" 

2770 F$="：02 R4CRFRGR R4CRFRGR" 

2780 H$="：04 E4E4E4E4 E4E4E4E4" 

2790 "!•，*57,58 

2800 C$=":03 E4REE4R4 E4REE4G4" 

2810 D$="：06 D4.E@l152R<GA>C” 

2820 E$="：02 R4BR>ERF+R <R4BR>ERF+R" 

2830 F$="：01 R4BR>ERF+R <R4BR>ERF+R" 

2840 ，■!，• ，59,60 

2850 C$=":03 F4RFF4R4 F4RFF4F4" 

2860 D$ = ..:06 D2.C4D4.E4 .C4" 

2870 E$="：03 R4CRFRGR R4CRFRGR" 

2880 F$="：02 R4CRFRGR R4CRFRGR" 

2890 "!•• *61,62 

2900 C$="：03 E4REE4R4 E4REE4G4" 

2910 D$="：06 D4.C4.<G2.RGA>C" 

2920 E$="：02 R4BR>ERF+R <R4BR>ERF+R" 

2930 F$ = .，：01 R4BR>ERF+R <R4BR>ERF+R" 

2940 •，！.，，63,64 

2950 C$="：03 F4RFF4R4 F4RFF4F4" 

2960 D$="：06 D2.C4 D4.E4.C4" 

2970 E$="：03 R4CRFRGR R4CRFRGR" 

2980 F$="：02 R4CRFRGR R4CRFRGR" 

2990 "!" •57,58 

3000 C$="：03 E4REE4R4 E4REE4G4" 

3010 D$ = ":06 D4.E®U52RCDE" 

3020 E$="：02 R4BR>ERF+R <R4BR>ERF+R" 

3030 F$="：01 R4BR>ERF+R <R4BR>ERF+R" 

3040 ，，！" '59,65 

3050 C$="：03 F4RFF4R4 F4RFF4F4" 

3060 D$="：06 F1G2A2" 

3070 E$ =，_:03 R4CRFRGR R4CRFRGR" 

3080 F$=":02 R4CRFRGR R4CRFRGR" 

3090 "!" *66,67 

3100 A$="T82 00 E-4R4E-E-R4 E-4E-4E-4E-4 T81" 

3110 B$="：03 R4D4R4DD L16 RB 32832 BBB 32832 BBBG32G32GGGDDD8 L8" 
3120 C$= n ：03 EEEE EEEE EEEE EEEE" 

3130 D$ = .，：06 G+0640EG+BB2.R" 

3140 E$="：02 R4BR>ERF+R <R4BR>ERF+R" 

3150 F$="：01 R4BR>ERF+R <R4BR>ERF+R" 

3160 H$="：04 EEEB EEEB L16 EEEB EEEB EEEB EE L8" 

3170 ”！" *68,69 

3180 RETURN 

3190 LABEL "P-B2" * MATCH IS POOR AT MAMA LEMON 


3200 A$ 
3210 B$ 
3220 C$ 
3230 D$= 
3240 E$= 
3250 F$= 
3260 G$= 
3270 H$= 
3280 "! 

3290 A$= 
3300 B$= 
3310 C$= 
3320 D$= 
3330 E$= 
3340 F$= 
3350 G$= 
3360 H$= 
3370 " 

3380 A$ 
3390 B$ 
3400 C$ 
3410 D$ 
3420 E$ 
3430 F$ 
3440 G$ 
3450 
3460 
3470 
3480 PLAY 


00 E-E-R4 E-E-R4 E-E-R4 E-.E-." 

：03 R4D4R4D4 R4D4"+R5$+"D."+L5$+"D."+C5$ 
：03 GGGG GGGG GGGG GG" 

：04 G>G-G<G>EG-<G>DE<G>D-D<GB" 

：04 R4I9q8G4RG4FG@496 R016>I7q5G.G.R" 

：04 R4I9q8D4RD4CD@496 R@16>I7q5D.D.R , ' 

：04 R1.q5 G.G.R" 

：04 EEEB EEEB EEEB E.E.R" 

，76,78 

00 E-4RE-4E-E-" 

03 R2D4R4.DR4.D" 

03 EEEE EEEE EEEE EEEE" 

05 ER»640EE" 

04 A-R@640A-A- m 
04 ER@640EE" 

04 EEEB EEEB EEEB EEEB" 

•79,80 

00 E-4RE-4RE-E-" 

：03 RDR2.RDRDRDDD 
：03 EEEE EEEE EEEE EG4." 

: V110 R1 0517 R«896 A&+" 

：05 RER4ER@640EER" 

04 RA-R4A-R@640A-A-R M 
04 RER4ERe640EER" 

•81，82 
RETURN 
LABEL 


•，P-B3" * 

:: :I3:I3:13" 


HELP ME! HELP ME! LUCY CRYING 


3490 LABEL "P-B3»" 

3500 A$="O0 RE-R4E-E-RE- RE-R4E-E-RE-" 
3510 B$ = ._:03 R4D4R4D4R4D4R4D4" 

3520 C$="：03 FFFF FFFE4EEEEFGA&+" 

3530 D$ = " ：05 A@64 0GEB«811>C®1 7 1C®10D«1 6 0 " 


132 Oh! X 1988.7. 


►いや ーキュー テイ ハニーには 参りました。しっかりテープに録って友入に 間 かせまわっ 
ています。 從橋 (19) 茨城阽 



















3540 

3550 

3560 

3570 

3580 

3590 

3600 

3610 

3620 

3630 

3640 

3650 

3660 

3670 

3680 

3690 

3700 

3710 

3720 

3730 

3740 

3750 

3760 

3770 

3780 

3790 

3800 

3810 

3820 

3830 

3840 

3850 

3860 

3870 

3880 

3890 

3900 

3910 

3920 

3930 

3940 

3950 

3960 

3970 

3980 

3990 

4000 

4010 

4020 

4030 

4040 

4050 

4060 

4070 

4080 

4090 

4100 

4110 

4120 

4130 

4140 

4150 

4160 

4170 

4180 

4190 

4200 

4210 

4220 

4230 

4240 

4250 

4260 

4270 

4280 

4290 

4300 

4310 

4320 

4330 


E$ = _. :03 V94q8F2 .RE@640RGRA&+ " 
F$="：03 V95q8C2.R<B«640R>DRE&+" 
G$=":02 V96q8F2.RE@640RGRA&+" 

H$ = •，： 04 EEEB EEEB EEEB EEEB" 

••! ，， ， 83,84 

C$=":03 AAAA AAAA AA>E<B >C<BGF 
D$=":06 Ce640<B4E@896EG@8A@120&+" 
E$="：03 A1R>DRCR く G4F&+" 

F$r" ：〇 3 E1RBRARD4C&+" 

G$= M ：02 A1R>DRCR<G4F&+" 

"!，• *85,86 
RETURN 

LABEL "P-B4” 

C$=":03 FFFF FFFE4EEE EFGA&+" 

D$ = .，：05 A@640GEB2.>CDE&+" 

E$="：03 F2.RE@640RGRA&+" 

F$="：03 C2.R<B@640R>DRE&+" 

G$ = ，.： 02 F2.RE0640RGRA&+" 

，'！" ， 87,88 

C$=":03 AAAA AAAA AA>E<B >C く BGF&+" 
D$="：06 E@640G4F+4DE2R<A&+ M 
E$="：03 A1,R>C4<F&+" 

F$=":03 El.RA4C&+" 

G$="：02 A1.R>C4<F&+" 

"!" ’89,90 
RETURN 

LABEL "P-B5" 


：03 FFFF FFFE4EEE EFGA&+" 

：05 A0640GEB2.>CDC&+" 

：03 F2.RE0640RGRA&+" 

：03 C2.R<B@640R>DRE& + , ' 

：02 F2.RE«640RGRAt+" 

•87,91 

：03 AAAA AAAA4AAA AABA" 

：06 C<B4A@1280>CEG@8A@120&+" 

：03 A0" 

：03 E0" 

G$=":02 A0" 

••!" ， 92,93 

A$="O0 RE-RE-RE-R4E-RE-E-E-E-4R" 

B$="：03 R4DRDR4DRBGDDR4D16D16" 

：03 AABA AAAA AAAA A>C4." 

：06 A81792 V114 RCe8D@l20&+" 

： V111 04L16I6"+E1$ 

：03 AR4AR4AR4.AR4>C4." 

：02 AR4AR4AR4.AR4>C4." 

*94,95 

LABEL "P-B6" 

00 E-E-RE-E-4RE- E-E-RE-E-4RE-， 1 
：03 R4D4R4D4 R4D4R4D4" 

：04 DDDD DDDD DDDD DED<A&+" 

：06 D<A>E<A>F<A>G<A>A<A>B<A>>CCei6De240C«L+" 
: V98 04I3L8 D4RDD4RDRDRDDE4 く A" 

：03 A4RAA4RARARAAB4E" 

：03 D4RDD4RDRDRDDE4<A" 

， 96,97 

：03 AAAA AAGA AAAA A>E<B>C" 

：07 C@640<BAElCei6D«112&+" 

：03 R4.AA4 RARARAR>C4." 

：03 R4.EE4 RERERERA4 . *' 

：02 AAAAA4 RARARAR>C4." 

*98,99 
RETURN 

LABEL "P-B7" 

A$="O0 RE-RE-E-4RE- RE-E-R E-16E-16E-16E-16R4，’ 
B$="：03 R4D4R4D4 D4.DR4D4" 

C$="：03 AAAA AAAA AR4.>A16A16A16A16A4" 

D$=":06 A«1280R2." 

E$= ": V112 04L16I6"+E1$ 

F$=":03 A1AR2." 

G$= M ：02 A1AR2." 

..!•， ，110，111 

RETURN 

LABEL "P-En" 

A$="O0 RE-RE-E-4RE-E-E-E-E-E-E-RE-" 


C$ = 
D$ = 
E$ = 
F$ = 
G$ = 
•，； 
C$ = 
D$ = 
E$ = 
F$ = 


C$ = 

D$ 
E$ = 

F$ 

G$ 


A$ = 
B$ = 
C$ = 
D$ = 
E$ = 
F$ = 
G$ = 
••! 
C$ = 
D$ = 
E$ = 
F$ = 
G$ = 


4340 G$=":02 A1R@640GRF&+" 

4350 ，，！，. *112,113 

4360 A$="O0 E-E-RE-E-4RE-RE-RE-E-E-RE-" 

4370 B$="：03 R4D4R4D4R4D4R4D4" 

4380 C$="：03 FFFF FFFE4EEE EEGA&+" 

4390 D$=":06 A2RGED4.EC4.DC4+" 

4400 E$=":03 F2.RE2.R4A&+" 

4410 F$=":03 C2.R<B2.R4>Ei+" 

4420 G$=":02 F2.RE2.EGA&+" 

4430 Ml 4，115 

4440 A$="O0 RE-RE-E-4RE-RE-R4E-E-RE-" 

4450 B$=":03 R4D4R4D4R4D4R2" 

4460 C$="：03 AAAA AAAA AAAA AG4F4+" 

4470 D$="：06 C<BA2. L16 EGAGABABAB>C ❿ CDE-D" 

4480 E$="：03 A1R«640GRF&+" 

4490 F$="：03 E1R@640DRC&+ M 
4500 G$=，，：02 A1R2AGRF&+" 

4510 "!" ’116,117 

4520 A$="O0 E-E-RE-E-4RE-RE-RE-E-E-RB-" 

4530 B$=":03 R4D4R4D4R4D4R4D4" 

4540 C$=":03 FFFF FFFE4EEE EEGA&+" 

4550 D$="：06 E4.DC<A4R8>E8E4.DCA4G8G«16A«1 124+" 

4560 E$="：03 F2.RE2.R4A&+" 

4570 F$=":03 C2.R<B2.R4>E4+ M 
4580 G$=":02 F2.RE2.EGA4+" 

4590 ”！" *118,119 

4600 A$="O0 RB-RE-E-4RE-E-E-E-E-E-E-RB- M 
4610 B$=":03 R4D4R4D4RBBBBGRD" 

4620 C$="：03 AAAA AAAA AA>E<A>C<BGF&+" 

4630 D$=":06 A@1152B8>C8D4C8<B8A8" 

4640 E$="：03 A1R0640GRF4+" 

4650 F$="：03 ElRe640DRC&+" 

4660 G$=":02 A1R2AGRF4+" 

4670 ”！" 1 120,121 

4680 A$="O0 E-E-RE-E-4RE-RE-RE-E-E-RE-" 

4690 B$="：03 R4D4R4D4R4D4R4D4" 

4700 C$=”：03 FFFF FFFE4EEE EEGA&+" 

4710 D$="：07 EDC<A> EDC<A> EDC<A> EDC<A> DC<BA> EDC<A> DC<BA> C く 
BAG" 

4720 E$="：03 F2.RE2.R4A&+" 

4730 F$=":03 C2.R<B2.R4>E&+" 

4740 G$="：02 F2.RE2.EGA4+" 

4750 •122,123 

4760 A$ = ..O0 RE-RE-E-4RE-RE-RE-E-RE-" 

4770 B$="：03 R4D4R4D4R4D4R2" 

4780 C$="：03 AAAA AAAA AAAA AG4F4+" 

4790 D$="：06 AB>CD8C<BA> C<BAG BGAG EAGE GEDE DC8D C<A>CD" 

4800 E$="：03 A1R@640GRF&+" 

4810 F$ = " ：03 ElR«640DRC&+ , ' 

4820 G$="：02 A1R2AGRF&+" 

4830 "!" * 124,125 

4840 A$="O0 E-E-RE-E-4RK-RE-RE-E-B-RE-" 


4850 B$ 
4860 C$=" 
4870 D$=" 
4880 E$=" 
4890 F$=" 
4900 G$=" 
4910 


03 R4D4R4D4RBBBBGRD 
03 AAAA AAAA AAAA AGGF&+" 
06 A0&+" 

03 A1R«640GRF4+" 

03 E1R@640DRC&+" 


03 R4D4R4D4R4D4R4D4" 

03 FFFF FFFE4EEE EEGA44-" 

06 EDC<A> CDED C<A>CD EDC<A8>CDE DC<A>C DEC<A> CDED" 
03 F2.RE2.R4A&+" 

03 C2.R<B2.R4>Ei+ n 
02 F2.RE2.EGA4+" 

*126,127 

4920 A$="O0 RE-RE-E-4E-4E-4R4E-4K-4" 

4930 B$=":03 R4D4R4D16D16D16D16 D4R4B32B32B16G32G32G16D4" 

4940 C$=":03 AAAA AAAA AR V117" 

4950 D$=":06 EGEG AGA-A BA>C<B> CDCG T84 A2.R4 V116" 

4960 E$=":03 A1AR” 

4970 F$="：03 E1ER" * THANK YOU MR. 

4980 G$=":03 C1CR" f PRINCESS LUCY WAS RESCUED 

4990 H$="：04 EEEB EEEB E4" » BUT MATCH ESCAPED FROM HERE 

5000 "!" ， 128,129 ， GO AND DESTROY THE MATCH 1 S SYSTEM 

5010 A$="O0 E-4E-4E-4E-4 E-4E-4E-4E-4" 

5020 B$ =，，：" 

5030 C$ =，，：03 AAAA AAAA AAAA AAAA" 

5040 D$=":I1 L8"+D1$ 

5050 E$= ":" : F$=":" : G$= ":” ： H 拿 = 

5060 * 130,131 

5070 "!" : 

5080 RETURN 
5090 LABEL " ! " 

5100 PLAY A$； : PLAY B$； : PLAY C$ ； : PLAY D$； : PLAY E$； : PLAY F 拿 ；： PLAY 
G$； : PLAY H$ 

5110 RETURN 




U スト 4 

TRUTH 


1000 

♦ 木木木本本本 

本本ホ本本本本本本本木氺氺ホ氺氺氺氺氺ホ本 

1210 

NEXT 

1010 

,本 

本 

1220 

FOR 1-0 TO 9 

1020 

•本 

TRUTH (by SQUARE) * 

1230 

SWAP KX (2, I) 

1030 

•本 

toiiposed by Ma s a h i ro Andoh ♦ 

1240 

NEXT 

1040 

•本 

本 

1250 

FOR 1-1 TO 4 

1050 

•本 

Progra 鼸 edby 倉田 嘉人 * 

1260 

POKE® ST,AD, 

1866 

•本 

1988.3.28.MON 本 

1270 

AD-AD+1 

1070 

•本 

本 

1280 

NEXT 

1080 

* * 〇 h ! M Z 

$£?,1987 の卩し八丫文拡張ブログラムで 本 

1296 

FOR l-l TO 4 

1690 

、 F M - 7 7 

AV を選択しておいて下さい * 

本 

1300 

POKE® ST,AD. 

i m 

•本 

1310 

AD-AD+1 

1110 

本本本本本本本 

本本本本本木本本本本本本本本ホ本本本本本本 

1320 

NEXT 

1 120 



1338 

FOR 1-1 TO 4 

1130 

DIM K% ( 4 9 9) 


1346 

POKES ST,AD, 

1140 

ST-PEEK0(e,&HFFF) + 1 

1350 

AD-AD 十 1 

1150 

入 D-$4C2 


1366 

NEXT 

1160 

FOR K»e TO 2 


1379 

FOR 1-1 TO 4 

i m 

FOR 1-0 TO 4 


1380 

POKE* ST,AD,, 

1 180 

FOR J-8 TO 

9 

1390 

AD-AD+1 

1190 

READ Kx (I 

, J) 

1400 

NEXT 

1200 

NEXT 


1410 

FOR 1-1 TO 4 


日本音楽著作権協会許諾第 8870414-80 1号 


1,5) 


AND 7 )**ie 


►あぶない福袋を江ち流みしながら笑いをこらえていると倒れそうになったので， n って 
帰っておなかがよじれるまで笑った。ちなみに， NZ -68 K の r 播秘本体部分写真」がどの 
部分なのか私は知っている。 佐伯稔 （21) 愛钹沿 


Oh!X LIVE in *88 133 


















1420 POKE® ST. AO, Ast (1,2) 

1430 AD-AD* 1 

1440 NEXT 

1450 FOR 1-1 TO 4 

1 460 POKE- ST,AD,A«(1,3)(I,4» **ie 

1 470 AD-ADd 

1480 NEXT 

1490 POKE#* ST.AD,A*(0,ei,Asn ： fl,2j + A«i0,3i*80,A%(0,4).A*(e.5j 
NU $FF,10,6; 

1 5 0 0 A D - A D ► 5 


1510 NK\T 
1 520 - 
1 530 - 
j b40 DMA 
1550 DATA 
1560 DATA 

1579 DATA 

1580 DATA 
1590 
1606 

1610 DATA 
1620 DATA 
1630 DATA 
1640 DATA 
1650 DATA 
1660 
1670 

1680 DATA 
1690 DATA 
1700 DATA 
1710 DATA 
1720 DATA 
1 730 - 
200d ' 
2010 
2020 
2830 
2048 


KLECTHIC 

GU 

FTKK 1 


— 42 

bU, 

15 

2 

.», 


V, «, U, \i 

31. 

28 

1 

0,15. 

1， 21 

,l. 2. e. 

31. 

13 

1 

3 ， 15 ， 

15» 0 

.0* i,e. 

31, 

28 

7 

， 15， 0 

, 25, 

o,1,0, 

31, 







ELECTRIC GUITER for SOLO PART _43 

49.15. 2.1, 200, 6 ， 2 ， 0, 0 

31 ， 6,IS, 5.10. 52, 4,1,1 

31. 7. 6, 6, 8, 6,1,1, 0, ft 

31, 6,15, 6,10. 35, 0,1,-3, 0 

31, 7, 6, 5, 8, 0.1,1, 3, 0 

LYRISYN »44 

48.15, 2 , 0, 40, 0 ， 0 ， 0 ， 0, 0 

16, 6. 0. 3 ， 1, 30, 3, 6.1, 0 

31 ， 11 ， 0 ， 7 ， 0 ， 60 ， 0, 4, 0 ， 0 

31, 4, 0. 3. 0, 24, 9, 2,-1,0 

16 ， 31 ， 0, 7 ， 0, 0 ， 0 ， 2, 0 ， 0 


PLAY DATA 
LYRISYN 


A 


2950 LY A IS- 04R4R1R1R2RA>CG&GF4E*EF16E16D<B-*B-2RGB->F4FE4D&D 
DC<G&G2RGB->F&FE4D&DE16D 16C<A&Ar 


2660 LY A 2$- R>FRERGRF&FED4R<A>CG*GF4E&EF16E16D<B-&B-2RGB->F&F 
E4D&DE16Dl6C<G&G2RGB->F&FE4D&DE16Dl6C<AiA2.>CRF4EG&G2" 

2070 LY.B.1$-*06L8C2&C<B-RA&A4.G&G2" 

2880 LY B 2$« B-4.AAA4GA&A4CAiA4R4iB-2&B-ARG&G4.F*F4GRF4RERDRC& 
C2 _ 

2090 LY_B_3S- R<B-F>C&C2&CD<B->E&E2RFCG*GHDG#iG#4EA&A2.RA 
2100 LY C 1$-"06D4<A>E&E<A4>F&F<A4>G&GF{EFE}8D 
2110 LY C 2$- •C4<G>D&D<G4>E4E<G4>F&F{EFE> 8DC - 
2120 LY_C_3$-. <B-4F>UC<F4>D*D<F4>E&ED {CDC} 8<B- > 

2130 LY C 4S- A2RB-AGFGAB-&B-G>CR 
2140 LY C 5$-~A2RAAGFGAB-&B-G" 

2150 LY.D 1$- 06CD&Dr 

2160 LY_F. 1$-"05R1L16FGAGFGAGFGAG{FGA>C<AG}4FAGFDGAGF>C<AGFGAG { 
FGA>C< 入 } 4 

2170 LY F 2S- GFGA{FGA>C<A}4GFGAFGAG{FGA>C<AG}4DAGF{<AGFDFG}4AG 
FD _ 


2186 LY_F_3S-'FGA>C< {GA>CDF}4{G>C<GFDF}4{G>C<GFDF}4 {G>C07C<FDF} 
4L32GB-A>C<B->DCE-' 

2190 LY F 4$-" {DC<B-AG}4L8F16A16G*G4*G4FDFGAA>C<A&A4&A4RGF4GAGF 
D<AGFDFAA 


2200 LY_F_5*-"AAA{GFD}8A16G16F16016{AGFDA}4&A2R{>DFG} «>C<{BAG} 8 


2210 LY F 6$-" {DFA}4G2AG4G16D16F16A16G4 & {GDFGAB-}4>C4.<AB->C<A> 
C&D4.C&C206' 

2220 LY_G.1$-"06CDL16iD8EFB>CC«DAD44D8{C く BA}8G2&G8DF>C<A8.' 

2230 LY.G 2$-"G4&G« {DFA} 8G4. <A8G-1. A>C<A2 

2240 LY G 3$- R4R8{DFA}8GA>CDEFAB>C4 •く AGA4>C8</U&A2&A8B8>C く BAG' 
2250 LY G 4$» FGAFAGFDF8DAG8FDAGFDAGFDAGFDAGFDAGFDAGFDAGFD {>C<A 
GFD}4 • 

2260 LY G 5$- AGED{>C<AGFD} 4AGFD{>C<AGFD}4AGFD{>C<AGFDi4AGFDGAB 

>C.. 

22 70 LY G 6S-"<A2FGA>C{<GAGFD}4GFD<A>D<AGFGAGFD<AGFF2&FDFAFGAG ^ 
2280 LY_G_7$- A>C<A>CDFDFDFGFGGFA>C<A>CDGDFDFGFGAGAGDAGF<C4&C8> 
C8>C<GC8' 

229 0 LY_G_8S--C>^STRING$ (10, *C<GC>") ♦ 一 C - 

2390 LY_G_9$-»V10e<GC>C<CC>C<GC>C<GC>C<GC>C<G®V96C>C<GC>C<GC>C 
<GC>C<GC>C<GC»V89>C<GC>C<GC>C<GE-8FB->C<B-AG' 

2310 LY G 10$- ?V86B-AGF {DFGAG}4FFGFDGFG«Vd0AB->C8D4&D4*D8C<B-» 
V70A2R8GA&A>C<AG" 

2320 LY_G_ 11 $- #V5 0F8. >C<A4&A4&A8FA*V3 0G2<iG8. FG4 
2330 ' 

3dde ELECTRIC GUITER 
3810 

3026 EG IHT 1$- 04R1R2R4RDFA>F<A>ECD<A>C<GB-GAD 
3030 EG. INT.2S- B->C&C2. <B->C*C4<B->C«iC4CD 

3 04 0 EG_I NT. 3$- 0 4R8DFA>F<A>ECD<A>C<GB-GADFA>F<A>ECD<A>C<GB-GAD 
EG_INT_5$-04R8DFX>F<A>ECD<A>C<GB-GADFA>F<A>ECD<A>C<GB-GAF 
3060 EG IHT 6S- 'B->C&C2.<B->C&C4<B->C*C4' 

3070 EG A 1$- 05L8C<A&A2.RE>D<E>C#<EA<A4>D&D0 5EF>C&C2iC lR<CDB-& 
B-2&B-1R<AB->P4F2&F1REF>C&C2' 

3080 EG A 2$- RO4CRCRERDADOSEF>C&C2&C1R<CDB-&B-2&B- l R<AB->F&F2 & 
F IRG>C4&C2<C4RCC2 

3090 EG_B_ 1$- 05 1 8F2RFR>C*C4.<BiB2 

31 ㈣ EG B 2$-~B4.A&A4GA&A4GA&A2B2RARA&A4.F&F2<F4RERDRC&C2 
3110 EG_1_B_3$-'8<B - >BCiC2RDRE&E2RFCG4G4EA-*A-4E" 

3120 EG 2 B 3S-"» 421804 A&A2.R4" 

3130 EG 3 B 3$-~«Vie5042LgO5A~ 

3140 EG.C.1$> » 42180604 <A>EiE<A4>F&F<A4>G&GF{EFE}8D' 

3150 EG.C.2S- C4<G>D&D<G4>E&E<G4>F*F{EFE}8DC' 

3169 EG C 3S- <B-4F>C*C<F4>D&D<F«(>E&ED {CDC} 8<B-' 

3170 EG_C_4S-—A2RB-AGFGAB-&B-G>CIT 
3180 EG C 5i-"A2RB-AGFGAB-&B-G 

3190 EG D 1$- 06C«43DAD4L32C<B-AG{FEDC<B-AGFE}8D2R2R4RL8«4204D 


32 0 0 EG.2.D_ 1$» VI 106D4LS2C<B-AG{FEDC<B AGFE}8D2L8V 10 
3210 EG.D2$-FA>F<A>ECD<A>C<GB-GADB->CAC2.<B->CiC4<B->C&C4CD 
3220 EG D 3$^ R04DFA>F<A>ECD<A>C<GB-GADFA>F<A>ECD<A 
3230 EG.D. 4$- 05C<GB-GADB->C&C2.<B->C&C4<B->CiC4CD" 

: S2 4 0 KG E li- ff4 3R4B-4*B->CRD\D2&DD4U6C<B->C4.<B->CDK-DC<B-AG> 
C 

32.50 EG E 2$- <BB-AGB- AGFGAGAL8G<G&G2G. B-16&B->C 
: <26 0 EG K 3$- D.K -16&E-FG4.AB->C4<B->CD4C16<B-16> 

32 7 0 EG E 4$- C4. <B->C<B->CD&DDDDL 16CI)DCDDCDDCUDFDCU 
3280 EC_E.5$- DDFDDDFG&G2* {FE-DC<B MACB-AGF<G8G2. 

3290 Eli.K, 6$- G8F4F8B-8A4>C8<AB>DF>C<BB-GAB-AGL8FGAGAB-Ab->C<B 

3 30 0 EG_E_7$- >CD4C16<B-16>C2' 

3310 K C... I- I $ - B 4. A16G16F 16D 16G.VGF 16D 16FfV 1 05i*42<EF>C*C2&C 1<RC 
3320 EG_F 2S- DAaA2*A1R<A 
30 EG_F_ 3$- B->F*F2&F2. 

3340 EG_F.. 4$- R 4 R E F>CiC 2 HO 4 C RC R E R D&DO 5 EF >C&C 2*C 1 R<C- 
3350 EG_F 5$- DA&A2&A104RA 
3360 EC.F_6$- B->FF2&F1REF>C&C205C4RCiC2 
3370 EG.C. 1$- 06C0&DUD1 

3 38 0 EG. 2.G.1$-"0 4H4L8 STRINGS(16, D j 
3390 EG.G.2S" 04 ^STRINGS (12. C )^ C4 

3400 EG_G_3$- 03 ^STRINGS il6, G »+STRING$(8. F'i 
341 0 EG_G.4$- >D4.E&E4C4" + STRING$(16, D ) 

3428 EG.G_9S--03#V95"+STRING$(8, G")♦'«V9 1"+ STRINGS(8, G')♦ *V8 
4 -STRINGS •F ") 

34 30 EG_G.lfl$- »V81>D4, E&E4C4 、 •V75 、 STRlNGiM8, — D. 卜 1V6 5、STR 
1NG$ (8,'D ) 

3440 EG.G.1 1$- 0 4#V4 8 ^STRINGS(8, C-)+ «V30CCCCCCC4" 

34 50 ' 

4000 - KEY BOARD 
40 10 ' 

4820 KY_i_INT_1$-'04L8R8DFA>F<A>ECD<A>C<GB-GADFA>F<A>ECD<A>C<GB 
-GAD 

40 30 KY. I_INT 2$- 0 4FG&G2.FG&G4FG&G4GA' 

4040 KY.2.INT_2$--04DE*E2.DE&E4DE&E4DF' 

4 0 50 KY_ 3_ I NT.2S- "03B->C*C2. <B->C<rC 4 <B->CiC 4C D " 

4060 KY_2.INT.5S- 04D4.RFE4E*EF4E&EF4RD4.RFE4E&EF4E&EF8 
4070 KY_3_[NT_5$- _ 03F4.RAG4G&GA4G&GA4RF4.RAG4G&GA4G&GA8• 

4080 KY _ 1 INT .6$- '04FGftG2.FGAC4FG&G4 

4090 KY.2.INT.b$- 04U>C&C2.<D>C&C4<B->C*C4 

4100 KY_3_INT_6$- 03B->C&C2.<B->C&C4<B->C&C4 

4110 KY_ I ,A„ 1$- 04L8GE&E2.RE>D<E>C#<EA<A4>F&F4E4EFRF*F4E4EFRFiF 
4E4EFRF&F4E4EFRF&F4E4EFRF&F4E4EFRF&F4E4EFR4 - 
4 120 KY_2_A_ 1$ - ■ 0 3L8CA&AUA2.iA>D&D4C4CDRD&D4C4CDRDiD4C4CDRD*D4 
C4CDRD&D4C4CDRD&D4C4CDR<C&C4C4CCR4 
4130 KY.1.A.2S-'RCRCRERD&D4C4CDRD&D4C4CDRD&D4C4CDRD&D4C4CDRD&D4 
C4CDRD&D4C4CDRC&C4C4CCR4C4.C&C4R4 
4140 KY_2_A_2$»RFRERGRF&F4E4EFRF&F4E4EFRF&F4E4EFRFAF4E4EFRFf&F4 
E4EFRF&F4E4EFRF&F4E4EFR4F4. E&E4R4 - 
4150 KY. ] _B.. 1$- 04D2RDRF&F4. D&D2" 

4160 KY_2_B.1$-'03B-2RB-RB-&B-4.F&F2' 

4170 KY_1_B_2$-"04F4.F&F4EF&F4EF*F4R4D2RFRF&F4.F*F4R4C4.CR<B-BG 

AC2 

4180 KY„2_B_2$- 04C4.C*C4CCiC4CC*C4R4A2RDRDiD4.D&D4R4A4.GRFRE&E 

2 

4190 KY_1 _B_3$-"0 3RFRG&G2RBR>C4C2RCRD*D4. D*D#4. - 
4 2 0 0 KY. 2_B_3$-"03RDRE&E2RFRG«.G2RAfiB-&B-4. B&B4. C«&C«2. 

4210 KY_3_B_3$--017L804E&E406«V110L32B-8.AGFEDC{<B-AGFEDCB-f8A8 

4220 KY.l_C.l$--«17L804Dl&Dr 
4238 KY 2 C l$-'04FUFr 
4240 KY_1 C 2$--CliCl" 

4 250 KY.2_C_2$--El4Er 
4 260 KY_l_C.3$-"03B-l&B-r 
4 2 70 KY_2_C.3$-"04Dl&Dr 
4280 KY.1.C_4$- 03F1D4.E&E4F4" 

4298 KY_2 C 4$-"03AlB~4.>C&C4E4 

4309 KY l_C 5$-"04Cl<B-4.>C&C4" 

4310 KY.2_C.5$--03F1D4.E&E4 

4 320 KY_1_D. 1$- 04L8CDR®V1 10DFA>F<A>ECD<A>C<GB-GAD" 

4330 KY.2.D.1$-"03L8EF* 

4 340 KY.1_D_2$-"04L8»V16 5FA>F<A>ECD<A>C<GB-GADDE*E2. DE&E4DE&E4E 
F. 

4350 KY_2_D_2*- _ 04L8RlR2R4FGiG2.FG&G4FG&G4GA' 

4366 KY. 1_D_3$-EG.D_3$ • 

4 37 0 KY. l.D. 4$- *0 5C<GB-GADDE&E2.DE&E4DE&E4EF' 

4380 KY_2_D_4$="04R2R4FG&G2.FG&G4FG&G4GA" 

4 390 KY_ l.E_1S- 04R4E-4&E-FRGAG1G24GA4. 

4480 KY 2 E 1$- 03R4G4&GARB-&B-1B-2&B-B-4." 

4410 KY l.E 2$-"04L8GliGl 
4 4 26 KY_2_E _2$-'04Dl&Dr 
4430 KY_3 E 2$-"03B-l&B-1 - 
4440 KY 1 E 3$- E-1E-F4.&FD4. 

4 4 5 0 KY.2_E.3$-"G1FA4.&AG4. - 
4460 KY_3.1B->D4.&D<B-4. 

4470 KY 1_E 4$-"03B-2AB-B-4B-4B-B4.R>DRD*D4C4' 

4480 KY_2_E_4$-"04D2&DD4D&DD4.RFKG&G4F4 
4 4 9 0 KY. 3_E.4$ - '04F2&FF4F&FF4.RARB&B4A4 
4500 KY_1.E.5$-04FGRG&G4F4FGRD&D2D2' 

4510 KY.2.E _5$- 0 4ABRB&B4A4ABRG&G2G2 
4 5 2 0 KY 上し 5$“ 0 4CDRD&D4C4CDR<B-*B-2B-2^ 

4530 KYI_E_6S-04DD 40404 DE2&EE4E&EF4F4E4. 

4 5 4 0 KY..2_E_6$- 04GG4G4G4GG2&GG4G&GG4G4G4. 

4550 KY_3_E.6$- 03B-B-4B-4B-4B-B-2&B-B-4B-&B-B-4B-4B-4. - 
4560 KY.I E 7$-'03B-4.B-4B-4. 

4570 KY.2_E_7$- 0404. D4D4. 

4586 KY 3 E 7$-"04F4. ¥A¥4. 

4 590 KY_ 1_F IS- 0 4C2RCRD*D4C4CDRD4D4C4CDRDiD4' 

4600 KY_2_F_IS- 04F2RERF&F4E<EFRF&F4E4EFRF*F4" 

4610 KY_1 F 2$-*04C4CDRDiD4C4CDRD&D4* 

4620 KY_2_F_2$--04E4EFRF4F4E4EFRF&F4- 
4630 KY_l_F.3$-04C4CDRDiD4C4CD" 

4640 KY_2_F_3$-^04E4EFRF&F4E4EF• 

4 6 50 KY„ I_F_4$- *0 4RF&F4E4EFRFiFERERGRF&F4E4EFRFAF4E4EFRF&F4 ' 


134 Oh! X 1988.7. 


►信设 • 全国版で123歲ごときはたいしたことはない。その程度で目が点になっていたら 
172歲で九州，四国を統一し，未だにブレイを続けている懷の友人を見たとたん気絶して 
しまいますよ。 下田紀之福岡県 













4660 KY 2.F 4 i - 0 4 R C^C 4 C 4 (： CRC» C C R (； KF R D& I) 4 C 4 C l)R |)& I) 4 (： 4 C I) R DAf!) 4 

400 KY.l_f_5$- 0 4E4EFRFiF4E4EFRFiF4 

4680 KY.2_F_5$-' 04C4CD8D&D4C4CDRD*D4 

4690 KY_1_F_6$- 04E4EFRF&F4E4EFRF&F4E4ERRRE4.EiE2 

4700 KY_2.F_6$= 04C4CDRD&D4C4CDRC&C4C4CCRCC4.C&C2. 

4710 KY.1_G_ 1$- 04L8CDFFFFFF4F6FECD&D2 
4720 KY.1_G 2$- 05L8CCCCCCCCCCDC&C<G4. 

4730 KY_2_G_2$= 04L8EEEEEEEEEEFE*EC4. 

4740 KY_l_G_3$ x 04B-B~B-B-B-A4B-&B-A4B-&A2A2AB-AG 

4750 KY_2 G 3$- 04DDDDDD4DiDD4D&U2C2CDCC 

4760 KY. J_G.4$- - 04F4.GaG2FFFFFF4F&FECD*D2 

4770 KY_2_G.4$= 04C4.C&G2DDDDDD4D&UGCFAF2 

4780 KY_1_G_9$-04V9B-B-B-B-B-A4V8B-&B-A4B-&A2V7A2ABAG 

4 7 90 KY . 2_G_9$- 04V9DDDDDD4V8D&DD4D&D2V7C2CDCC' 

4800 KY_1_G. 10$- 04V5F4.G&G2V4FFFFFF4V3F&FECD&D2 
4816 KY_2_G. 10$- 0 4VSC4.C&C2V4DDDDDD4V3D&DGCF&K2 
4826 KY_ 1_G_11$ 05L8V2CCCCCCCCV1CCDC&C<G4. 

4830 KY_2_G_11$^ 04L8V2EEEEEEEEV1EEFE&EC4. 

484 0 

5000 - ELECTRIC BASE 
5010 - 

5020 BA_INT„2$- 02L8B->CiC2.<B->C^C4<B->C&C4CD 
5930 BA_INT.5$-R8 + STRINGS(29, D) 

5040 BA_INT_6$-"<B->C&C2.<B->C&C4<B->CiC4" 

50 5 0 BA_A_ 1$- C<A&A2.R8>E>D<E>C»<EB-<A4> D&D" + STRING$ {14,'D ) 
十 .. 十 STRINGS (1 3, B- ) + " ACiG " STR I HG$ (14 ， G) + F&FFFFFFB-4" 

5 06 0 BA_A_2S R>CRCRERD&D'+STRIHG$U4,”D . 卜 .、STIU NG$ (13, 
B- ) + AGiG -t-STRINGS (14, ■ G ~} バ F&FFFFFAB-B>C4RC&C2 .. 

5070 BA.B.1$ J- 02G2RGRG&G4.G&G2. 

50S0 BA_B_2$- F4. F&F4GFiF4GFiiF2B-2RB-RB-«iB-4. >C&C2F4RER0RC&C2 ' 

5 0 9 0 BA.B.3$- R<B->RC&C2RDRE&EE<E4&E4. G&G4. G#&G#4. A&A1 
5100 BA_C_ 1$- " 03" + STRINGS (13, ~D')+"<AB-B ■- 
5110 BA_C_2$-">CCCCCCCCCCCCDC<B-A 
5120 BA_C_3$-STRING$ (16,"G") 

5138 BA„C_4$-STRING$(8, - F - )^*>D4.E&ECC4<~ 

5140 BA_C_5$-STRIHG$(8,"F")+'>D4.EAE4 
5150 BA_D_ l$»"CDRlRr 

5168 BA_D_ 2$- 02R1R2R4B->C&C2.<B->C&C4<B->C&C4CD' 

5170 BA_D_3$-STRIHG$ (3,'R4D4R4D4 ') 

51S0 BA_D_4$-"R4D4R4<B->C&C2.<B->C&C4<B->C&C4CD' 

5190 BA.E_ 1$- R4E-4&E-FR<G&G ^STRINGS (15,~G") 

5200 BA_E.2$-"03"^STRING$(13, 'E- )+ <AB-B * 

5210 BA_E_3$» 03" + STRINGS (15, "C ) -^ <A 
5220 BA_E_4$-STRING$(13,'B-')+"FRG*GGGG~ 

5230 BA_E_5$-STRIHG$ (ie, "G* ) +">DE AE-E-E-E-E-E-E-E- *" 

5 24 0 BA_E_6$-"E-E-E-E-E-<AB-B> +STRINGS (16,"C") 

5250 BA_E_7$-~02BBBBBBBB" 

5260 BA_F_ 1$-'F4. FR>C8D&D ' + STR I NG$ (13, T) +"<AB-&B-B-" 

5270 BA_F_2$-STRING$(12, "B-*) +~AGAGG' 

5280 BA_F_3$-STRING$(12, "G") 

5290 BA_F_4$-*GF&FFFFFFFF8>CRCRERD&D' + STRING$(13, "D") + *<AB-*B-B 

53«0 BA_F.5$-STRING$(12, B') 十 - AGGG” 

5310 BA_F_6$-STBIKG$(13,"G")+"F&FFFFFAB-B>C4RCC2~ 

5320 BA_G_1$-~03C"+STRIKG$(14 f 'D")+•<AB-B>" 

5330 BA_G_ 2$- STRINGS(12,"C~)+"DC<B-A~ 

5 34 0 BA_G_3$-STRING$ (16, "G**) + STRINGS (8, 'F') 

5358 BA_G_4$-"0 3D4. E&ECC 4"-h STRINGS (13, "D") -*-<AB-B>' 

5360 BA_G_9$-'V11~+STRING$(8,"G")+"V10"+STRING$(8, _ G")+"V8"+STR 
INGS (8, "F") 

5370 BA_G_ 1 0$- "03V6D4. E&ECC4 " + " V5 " + STR I HG$ (8, T) + *V4"+ STRI HG$ ( 
5, "D")+"<AB-B>- 

5 38 0 BA_G.1 1$- "V3~ + STRING$(8, - C - ) +*V2CCCCDC<B-A" 

5390 ‘ 

6eee ' drums 
6010 ' 

6020 E4$- «36E4" 
bU30 E8$° ^36E8 
6040 A4$- «38A4" 

6050 A8$« »38A8" 

6060 K4$-"R4" 

6070 R8$-"R8" 

6088 PA_ 1$-A4$ + E4$ + A4$ + E4$ 

6090 PA_2$-A4$+E4$+A8$+A8$+E4$ 

6100 ' 

6118 DR_IHT_1$-STRIHG$(3,PA.1$)+A4$+E4$+A4$ 

6120 DR_INT_2$-E8$ + A8$ + R4$+E4$ + R4$ + E8$ + A8$ + R4$+E8$ + A8$+R4$<-E8$ + 
A8$ 

6130 DR_ 1NT_3$-R4$ + E4$ + A4$ + E4$+STRING$(2, PA 1 十 JU* +E4* +A4S 
6140 DR_INT_5$-R8$ + A8$ + E4$ + A4$+E4$^STRING$(2,PA 1$) +A 4 $ 十 E4 い A4$ 

6 150 DR_ INT_6$-E8$+A8$ + R4$+E4$i-R4$+E8$ + A8$ + R4$+E8$^A8$ + R4$ 

6168 DR_A_1$-E8$^A8$+PA.1$ + -L8»36GDFDDCR - +A8$ + R8$^A8$ + E4$ + A4$ + E 

4$+A4$+E4$+A4$+E8$+A8$+R4$+E4$+A4$+E4$+A4$+E4$+A4$+E8$+A8$+R4$+E 

4$+A4$+E4$^A4$+E4$+A4$-E8$+A8$+R4$+E4$+A8$+A8$+E4$ 

6 170 DR_A_2_ 1$-R8$^A8$ + E8$ + A8$ + R8$+A8$ + E8$+A8$+R8$-»-A8$^E4$^A4S + 
E4$ + A4$+E4$ + A4$+E8$ + A8$+R4$ + E4$ + A4.$+E4$tA4$ + E4$+A4$ + E8$ +A8S 
6180 DR_A_2_2$-R4$+E4S+A4$+E4$+A4$+E4$+A4$+E8$+A8$+R4$+E4$^-R8$+ 
«36C16C16"+E8$+R8$+A4S+R8$+A8$^R8$+A8$+E4$ 

6】 90 DR_B_1$-A4$+E4$+R8$+A8$+E8$+A8$+R4$+E8$+A8$+R4$+E4$ 

6200 + ••• 入 8$+R4$ + E8$ 十入 + 十 + 

$+H8$+A8$tE8$+A8S+R4$+E8$+A8$+R8S+A8$+E4$+A4$+E8$+A8$+R8$^A8$+R8 

$ 十入 8$ + R8$ + 入 8 $ ャ 

6210 DR_B_3$-R8$+A8$^R8$+A8$+STRING$(2,R8$+A8$+E4$+R8$+A8$tR8S+ 
A8$)+R4$+E8$+A8$^R4$+E8$+A8$+R8$+E8$»E16E8.E8E16E16E16E16E8 
6220 DR_C_ 1$-PA_1$ + PA 1$ 

6238 DB_C_2$-PA_1$+PA 1$ 

6240 DR_C_3$-PA.1$+PA_1$ 

6259 DR_C_4$-A4$ 十 E4$ + 又 8$ 十 + + 入 8$ + R8 $ 十 

6260 DR_C_5$-A4S+E4$+A8$+»36{CFD}8C8C8~+A4$+E8$+A8$*R4$ 

6270 DR_D_1$«A4$+E8$+A8$+R4$ 

6280 DR_S.D.2$=© 361804 R1R2R4EER2R4EER4EER4EEL4 
6298 DR_B D 2$- @38#V120L4O4' +STRING$ (16, A ) 

6300 DR_S_D.3$-STRING$ (6, RC') 

6310 DR_B_D_3$-STRING$(12,"A ) 

6329 DR_S_D_4$- RCRRL8#37#V120GGFFDDCCGGFFL4{GGEM{EDD}4 


6 330 DR_B_D.4$-STRING$ (12,"A") 

6340 DR ,.S„E 1$- @V117 {CCC} 4@3BRERRERERERE 
6 350 DH.B_E_ 0V 117AARR8A8R8A16A 16RARAKA8ASR" 

6360 DR.E_2$-FA.1$+PA_1$ 

6 370 UK_ E .. 3$‘PA_ UtpA_2$ 

6 380 = 争 

6390 DR,E_5$-A4$*E4$-PA_2$^PA_]$ 

6400 0K.E.6$=HA_2$*PA.. li^PA_2$ 

641 0 DK.E_7$ = PA.2$ 

64 20 + + + + + 

$ ►PA 2$^A4$ 

6430 DK_F_2$=E4$^A4$^E4$+FA_2$+A4$ 

64 4 0 DR„F 3$ = li4 ： t ， 入 4$*E4$ す入 + + 

6450 DRF.4$=E4$+PA_2$+R8$+A8$+E8$+A8$^R8$+A8$^E8$^A8i^K8t^A8$» 
E4$+A4$^E4$+PA_2$+A4$ 

6460 DR_F_5S-E4S + A4$+E4$ + PA_2$*A4S; 

6470 DR_F_6$«E4$^A4$+E4$+PA_2$+PA.2S+A4S+E8$+A8$+R8$»@36G8G4 
6486 DR_G_ 1$- A8$ + E8$+PA 2$»-PA 2$ 

6490 DR_G_2$-PA_2S^PA„2$ 

6500 DR_G_3$»FA_2$+PA_2$+PA_2$ 

6510 DR_G_4$»A4$+E8$^A8$+R4$^E4$-PA 2$>PA 2$ 

6 520 DR_G_9$ ， _V110 、 PA_2nV10O. 、 h_2$ ，、 V95 、 PA_2$ 

6530 DR_G_ 10$- @V88 ^ A4$ + E8$+A8$ + R4$+E4$+ ®V82 +PA 2$- @V72 rPA 
. 2 $ 

654 0 DR_G 1 1$- «V48 >PA 2$^ '«V30" + PA 2$ 

6550 ' 

ieeeo main 
10010 ' 

10020 PLAY INIT 

10830 PLAY @42L804tl65«»Vl 05 f @ 17 1804 t 165«»V 1 05 , 180411 65#V117 
, 18041165 V12', L8O4T165V10, L 8041165 VI 0 
1 004 8 PLAY EG„ INT_1$,K'Y_1_INT_1$,DR_JNT_1$ 

1 0 050 PLAY EG 1NT 2$,KY.1 INT 2$,DR 1NT 2$,BA INT 2$,KY 1 I NT 2$ 

， KY_3. INT_2$ 

10060 PLAY EG_IMT_3$,KY_1_IHT.1$,DR_INT 3$ 

10070 PLAY EG_INT 2$,KY 1 INT 2$，DR INT 2$,BA INT 2$,KY 2INT 2$ 

,KY_3_INT_2$ 

10080 PLAY EG INT 5$,KY 1 IHT 1$,DR INT 5$,BA INT 5$,KY 2 INT 5$ 
,KY_3_INT_5$ 

10090 PLAY EG_1NT_6$ ， KY_1_INT_6$ ， DR_INT 6$,BA 1KT 6$ f KY 2 INT 6$ 
,KY_3_ INT_6$ 

10100 PLAY EG.A_1$,-@44«V110-+LY_A_1$,DR A 1$,BA A 1$,KY 1 A 1$, 
KY_2.A.1$ 

10110 PLAY EG_A_2$ t LY_A.2$,DR„A_2_l$^DR A 2 2$,BA A 2S,KY 1 A 2$ 
,KY_2_A_2$ 

10120 PLAY EG_B_1$,LY_B_1$,DR_B_1$,BA_B.1$,KY_1 B 1$,KY 2_B 1$ 
10130 PLAY EG_B_2$,LY_B_2$,DR.B.2S,BA_B_2$,KY_1 B 2$ r KY 2 B 2$ 

10H0 PLAY EG_1_B.3$ + KY_3_B_3$ + EG_3.B.3$,LY B 3$, DR B 3$, BA B 3$ 

,KY.l.B_3$+EC_2_B_3$,KY_2_B_3$ 

10150 PLAY EG_C_1$,LY_C_1$,DR_C_1$,BA_C_1$,KY 1 C 1$,KY 2 C 1$ 
10160 PLAY EG_C 2$，LY C 2$,DR C_2$,BA C 2$，KY 1_C_2$,KY 2 C 2$ 

10170 PLAY EG_C_3$.LY.C_3$,DR_C_3$,BA C 3$,KY 1 C 3$,KY 2 C 3$ 

10180 PLAY EG_C_4$,LY_C.4$,DR_C_4S,BA_C.4S,KY_1_C 4$ f KY 2 C 4$ 

10190 PLAY EG_C_1$,LY_C_1$,DR.C 1$,BA C 1$,KY 1 C 1$,KY 2 C 1$ 

10200 PLAY EG_C_2$,LY_C_2$,DR_C_2$,BA_C_2$,KY_1_C_2$,KY.2_C.2$ 
10210 PLAY EG C 3$,LY C 3$, DR C 3$, BA C 3$,KY 1 C 3S.KY 2 C 3$ 

10220 PLAY EG_C_5$,LY_C 5$,DR C 5$,BA C 5S,KY 1 C 5$,KY 2 C 5$ 

10230 PLAY EG_D 1$,LY D 1$,DR D 1$,BA D 1$,KY 1 D 1$,KY 2 U 1$+E 

G_2_D_1$ 

10240 PLAY EG_D_2$,DR.S D 2$,0R B D 2$，BA D 2$,KY 1 D 2S,KY 2 D 
2 $ 

10250 PLAY EG_D_3S,DR.S_D_3*,DR_B_D_3$,BA_D_3S,KY_1_D 3S 

10260 PLAY EG_D_4$,DR.S_D_4$,DR_B_D_4$,BA_D_4$,KY_1_D_4$,KY 2 D 

4$ 

1 027 0 PLAY •■ ❺ V110 • 十 EG_E_1$ ， DR_S_E 1$,DR B E 4$ t BA E 1$,KY 1 E 1$ 
,KY_2_E.1$ 

10280 PLAY EG_E_2$ ， "ei7Vl0、KY 1 E 2$,DR E 2$,BA E 2$,KY 2 E 2$, 
KY_3„E_2$ 

10290 PLAY EG_E_3$,KY.1_E_3$,DR_E.3$,BA E 3$,KY_2 E 3$ r KY 3 E 3$ 
10300 PLAY EG_E_4$,KY_1_E_4$,DR_E_4$,BA_E_4$ > KY_2_E_4$,KY 3 E 4$ 
10310 PLAY EG_E_5$,KY_ 1 _E_5$,DR_E 5S,BA E 5$,KY 2 E 5S,KY 3 E 5$ 

10320 PLAY EG_E_6$,KY_1_E.6S,DR_E.6$,BA_E_6$,KY_2_E 6$,KY 3 E 6$ 

10330 PLAY EG_E_7$,KY.1_E_7J,DR_E_7$,BA.E_7$,KY_2 E 7$,KY 3 E 7$ 

1 034 0 PLAY EG_F_1$, 04 40V1 10"+LY_F_1$,DR F_1$,BA F 1$,KY 1 F 1$, 
KY.2_F_1$ 

10350 PLAY EG_F_2S,LY.F.2$,DR_F_2$,BA_F_2S,KY_1_F_2S,KY 2 F 2$ 

10360 PLAY EG„F„3$,LY_F_3$,DR_F_3$,BA_F_3$,KY_1_F_3$ > KY_2 F 3S 

10370 PLAY EG_F_4$,LY_F_4$,DR_F_4$,BA_F_4$,KY_1_F_4$,KY 2 F 4$ 

10380 PLAY EG_F.5$,LY_F_5$,DR_F_5$,BA_F_5$,KY 1 F 5$,KY 2 F 5$ 

1 0 39 0 PLAY EG_F.6$,LY..F_6$ > DR_F.6$,BA_F.6$,KY.1_F 6$,KY 2 F 6S 

10400 PLAY EG_B_1S,LY.B.1$,DR_B_1$,BA.B_1$,KY_1_B.1$,KY 2 B 1$ 

10410 PLAY EG_B_2$ > LY.B.2$,DR_B_2$,BA.B 2S.KY 1 B 2$,KY 2 B 2$ 

10420 PLAY EG_1_B_3$+KY_3_B_3$+EG_3_B_3$,LY B 3$,DR B 3$,BA B 3$ 
,KY_1.B_3$+EG_2_B 3$,KY 2 B 3$ 

1 0430 PLAY EG_C_l$,LY.C_l$jR_C_l$,BA_C 1$,KY 1 C U.KY 2 C 1$ 

10440 PLAY EG_C.2$,LY.C_2$,DR_C_2S,BA_C_2$,KY 1 C 2$,KY 2 C 2$ 

10450 PLAY EG_C_3$,LY_C_3$,DR_C_3$,BA_C_3$,KY 1 C 3$,KY 2 C 3$ 

10460 PLAY EG_C_4$,LY_C.4$,DR_C_4$,BA_C_4$,KY 1 C 4$,KY 2 C 4$ 

10470 PLAY EG„C_1$,LY_C_1$,DR_C_1$,BA_C.1$,KY 1_C 1$,KY 2 C 1$ 

1 0 480 PLAY EG_C_2$, LY.C_2$, DR_C_2$, BA_C_2$, KY 1 C 2$,KY 2 C 1 %. 

10490 PLAY EG_C_3$,LY_C_3$,DR_C_3$,BA_C_3$,KY_1_C 3$ r KY 2 C 3$ 
10500 PLAY EG.C_5$,LY_C_5$,DR_C_5$,BA_C.5S,KY_1_C_5$,KY_2_C_5S 
10510 PLAY EG_G_1$,LY_G_1$,DR_G_1$,BA G 1$,KY 1 G_1$,EG 2 G 1$ 

1 0 520 PLAY EG G 2$,LY G . 2$,DR G 2$,BA G 2$,KY 1 G 2i,KY 2 G 2S 

l»53tf PLAY EU.G_a$,LY„G_3$,DR_G_3$,BA_G 3$,KY 1 G 3$,KY 2 G 3$ 

10540 FLAY EG_G_4$ f LY.G.4$,DR.G_4S,BA.G.4$,KY 1 G 4$,KY 2 G 4S 

10 550 PLAY EG_G.2$, LY..G.5$, DR_G.2$, BA_G.2$, KY 1 G 2$,KY 2 G 25 

10560 PLAY EG_G_3$,LY.G.6$,DR.G.3S,BA_G.3$,KY_1_G_3$,KY 2 G 3$ 
10570 PLAY EG_G_4$,LY.G_7$,DR_G_4$,BA_G.4$,KY 1 G 4$,KY 2 G 4$ 

10580 PLAY EG.G.2$,LY_G_8$,DR.G.2S,BA.G.2$,KY 1 G 2$,KY 2 G 2$ 

10590 PLAY EG_G_9$,LY.G_9$,DR_G_9$,BA_G_9$,KY_1_G_9$,KY.2 G_9$ 

1 0 60 0 PLAY EG_G_10$,LY_G_10$,DR G_ 1 0$,BA G ie$,KY J_G 1 0$,KY 2 G 
_ 10$ 

10610 PLAY EG_G_ 11$, LV.G. 11$, DR_G.11$, BA G 11$, KY 1 G liSjy 2 G 
_ 11 $ » 


►おい 6 月号の 21 ページに戟っていた（で）とかいう奴。なにが「まじゃべんちゃ一のう 
さぎちゃんは私のものだ j だ。私はず一っと以前から目をつけてたんでい！おまえなん 
かにやるもんか。僕のものだい！ 悔しかったらどっちがロリコンと呼ばれているか勝良 
してみるかい？ ふっふっふつ。 一戸譲（17> 宮城県 
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入 6 

10 

DC 

C9 

ee 

FF 

FF 

74 

FF 

FF 

ee 

ee 

FF 

FF 

FC 

FF 

FF 

ee 

ee 

FF 

FF 

FC 

FF 

FF 

ee 

ee 

FF 

FF 

FC 

FF 

FF 

ee 

ee 

FF 

FF 

FC 

FF 

FF 

00 

00 

FF 

FF 

FC 

FF 

FF 

00 

ee 

FF 

FF 

FC 

FF 

FF 

00 

ee 

FF 

FF 

FC 

FF 

FF 

00 

00 

FF 

FF 

FC 

FF 

FF 

00 

00 

FF 

FF 

FC 

FF 

FF 

ee 

ee 

FF 

FF 

FC 


1 ORG ?CS0e 

2 COLOR EQl $CFFF 

3 MAIN 

\ LD HL,$DOOO 

3 LD DE,$DO(M 

S LD BC, 5000 

7 ID (H!.) , 

8 LD1R 

9 LD HI., ?D800 

10 LD DE,SD801 

11 I.D BC, 1000 

12 LD (HL) , L 

13 LDIK 

14 LD A,9 

15 LD (S EOOO) , A 

16 LD A, ($F.OO!) 

17 IKC A 

18 JP NZ,YOKO 

19 RVD 

20 LD IX,$CF09 

21 LD A.R 

22 AND $77 

23 LD (COLOR) , A 

24 CALL HANGON 

25 LD (I X) , A 

26 CALL OUTRUN 

27 LD ( I X H ), A 

28 CALL HANGON 

29 LD (IX + 2) , A 

39 CALL OUTRUN 

31 LD ,(!X*3) ,A 

32 CALL LINE 

33 JR RND 

34 OUTRUN 

35 LD A,R 

36 ADD K, (IY) 

37 AND 31 

38 LD C.A 

39 l.D A, R 

40 ADD A, (IY- I) 


79 8B D56F SUM ： 3F F912 F313 941C 7E 9D4F SUM 

i i リスト E L I NE ルー チン ソース リスト 


SUM ： B8 77 57 49 C2 0B 


CtOO 

cseo 

rsoe 

rsoe 2 ioo do 

C«03 II 01 DO 
CS08 01 F.S 03 
C«09 3S 5A 
CSOB KD RO 
C80D 2! OC P8 
0810 1! 01!)8 
C8!3 0! F.8 0 3 
C816 75 
C?!? ED B0 
C819 3E 09 ' 

C8IB 32 00 EO 
C81E 3\ 01 EO 
C8213C 
C822 C2 7F C8 
C825 

C825 DU 2100 CF 
C829 FD 5K 
C82B E6 77 
C82D 32 FK CF 
C838 CD 66 C8 
C833 DD 77 00 
C836 CD 41) C8 
C839 DD 77 01 
C83C CD 66 C8 
C83F DD 77 02 
C842 CD 40 C8 
C845 DD 77 03 
C848 A2 C8 
C84B 18 D8 
C84D 

C84D ED 5F 
C84F PD 86 00 
C852 E6 IF 
C354 4F 
C855 ED 5F 
C857 FD 86 FF 


C880 21 00 CF DD 36 00 00 DD 
C888 36 0218 21 FF CF 34 06 
C890 28 C5 78 3D DD 77 01 DD 
C898 77 03 CD A2 C8 Cl10 FI 
C8A0 18 E9 DD 7E 63 DD 96 01 
C8A8 6E 00 CA BA C8 0E 23 D2 
C8B0 BA C8 DD 7E 01 DD 96 03 
C8B8 0E 2B 3C 57 47 79 32 29 
C8C0 C9 21 00 00 4D DD 7E 02 
C8C8 DD 96 00 CA DD C8 2128 
C8D0 00 D2 DD C8 DD 7E 00 DD 
C8D8 96 02 21 D8 FF 3C 5F 22 
C8E0 18 C9 22 25 C9 DD 6E 00 
C8E8 C5 D5 DD 5E 6116 60 62 
C8F0 29 29 29 44 4D 29 29 09 
C8F819 01 00 D8 09 Dl Cl3A 


D0 11 01 D0 e1 E8 
5A ED B0 2106 D8 
D8 01 E8 83 75 ED 
99 32 00 Ee 3A 01 
C2 7F C8 DD 21 B6 
5F E6 77 32 FF CF 
C8 DD 77 80 CD 4D 
77 01 CD 66 C8 DD 
CD 4D C8 DD 77 03 
C818 D8 ED 5F FD 
E6IF 4F ED 5F FD 
E6 07 814F ED 5F 
81 FD 23 C9 ED 5F 
00 E6 0F 4F ED 5F 
09 E6 07 814F ED 
ei81 FD 23 C9 DD 


: E0 A6 94 0D El FA 2C 9F BF3E 


41 


AND 

7 

42 


ADD 

A,C 

43 


LD 

C，A 

44 


LD 

A, R 

45 


AND 

1 

46 


ADD 

A.C 

47 


INC 

IY 

48 


RET 


49 

HAKGON 



50 


LD 

A, R 

51 


ADD 

k, (IY) 

52 


AND 

15 

53 


LD 

C , 入 

54 


LD 

A,R 

55 


ADD 

a, (iy+9) 

56 


AND 

7 

57 


ADD 

A,C 

58 


LD 

C，A 

59 


LD 

A, R 

60 


AND 

1 

61 


ADD 

A,C 

62 


INC 

IY 

63 


RET 


64 

YOKO 



65 


LD 

IX,$CF0O 

66 


LD 

(IX) , 0 

67 


LD 

(IX+2) , 2i 

68 

YX 



69 


LD 

HL,COLOR 

70 


INC 

(HL) 

71 

; 



72 


LD 

B，40 

73 

YK 



74 


PUSH BC 

75 


LD 

A, B 

76 


DEC 

A 

77 


LD 

(IX+ 1),A 

78 


LD 

(IX+3) f A 

79 


CALL LINE 

86 


POP 

BC 


鼷速 (?) UNE ル-チン 

Takada Masami 

高田正実 


LINE ルーチンというと以前，試験に出る 
XI でアルゴリズムが紹介されたことがあり 
ますが，これはそういったものや雑誌でよ 
く紹介されているものとはまったく異なる 


アルゴリズムによるものです （ Oh ! FM 誌に 
は以前載っていた）。 MZ -700 にはこういっ 
たアルゴリズムのほう 力す， ほかのものに比 
ベてはるかに有利なのです。たぶん X 68000 
でもそうでしょう。 

非常に短いソースリストですので特にア 
ルゴリズムの解説はしません。暇と興味の 
ある人はぜひとも解析してみてください。 

I 入力方法 I 

モニタから C 800 h 〜 C 92 CH までを入力し 
てください。 

氺 JC 800 

で起動すると，てきと一に線を引き始めま 


最近はシヨートプログラムの投稿も増えて 
きて，まことに喜ばしい限り0今月はなん 
と M Z -700用の高速 LINE ルーチンと X 1 
turbo で XI 用の漢字 RCM を使用したア 
プリケーシヨンを実行するための日 ASIC 
改造プログラムです。 

す（キャラクタ単位なのであまり期侍しな 

ぃように)〇 

このとき フアン クシ ヨン キーを押してリ 
ターン キーを押すと右から左に線を引きま 
す。ただし，速すぎてほとんど識別できま 
せんが。 ハ。ラメータは， 

LINE ( X 1， Y 1) - （ X 2, Y 2) 

の場合， 

( IX )= Y 1 (IX + 1)= X 1 

(IX + 2)= Y 2 (IX + 3)= X 2 

となっています。 


Profile 

◊高田さんは群馬県にお住まいの19歲，現在大学 
2年生です。使用機種は MZ -700 と MZ - 2500 V 2< 
5月の投稿数19本という記録の持ち主です。 

リスト1 LINE ルーチン 


SHORT ACCESS 


F090E 00600000000 

c 0 C 0000000000000 

F 610910000000008 
F320CC 0000000000 

080808 0808080808 
00] 1223344556677 
9999999999999999 

cccccccccccccccc 


09433 D474BFDCE77 
E7D7D55E92A4346C 


7 F 1 3 
0 5 0 2 

61 F D 6ID 9 
E 8 4 E E 8F c 

ACD F 0 23 5 6 c 
5 5 5*5 6 66 6 6c 


ee 

F 6 F 

5 00 0 


o 

F 6 7 
5 8 0 


FI 3 
5 0 2 


p 0 8 
c 0 1 

0 0 2 


8 

2 


13 8 

0 0 c 

7 7 2 
7 7 A 


) 3 5 6 C 


D D D 14 6 5 8 D D D D 1 
DDD 23 0 C73DDCC 

WBEFF1 12347 AD 


M 66666777777 777770088 A 
8 8 8 8 8 88 8S 8888888 SS8888S 8888888 B 888888888 

c c c c c cc ccccccccccccccccccccccccccccccccc 


061ECD6D220F1666 
03033 E6D0A0F088E 

13100 FD 8 7»d 6 6 6 d d f 
201BECCC7C88EFF5 

080898080 s 080808 
0011223344556677 
8888888888888888 
cccccccccccccccc 


c 9843895203 ED36D 
B 234276 FB 7289138 


136 Oh! X 1988.7. 






















Dm YK 
JR YX 

LINE 

；LD IX,$CF80 

LD A, (!X*3) 
SUB (IX+ 1) 
LD C, 0 
JP Z,STX1 
LD C,$23 
JP NC,STX1 
LD A, (IX+ 1) 
SUB (IX+3) 
LD C,$2B 

STX1 


81 

82 

83 

84 

85 

86 

87 

88 
89 
96 

91 

92 

93 

94 

95 

96 

97 

98 

99 
oe 


02 

03 

04 

05 

96 

07 

08 

eg 


0 STX2 

1 INC A 

2 LD E,A 

3 LD (UYP1 + 1),HL 

4 LD (UYP2+1),HL 

5 LD L,(IX) 

6 


8 TDXY 


19 

PUSH BC 

20 

PUSH DE 

21 

LD E, (IX+ 1) 

22 

LD D，0 

23 

LD H，D 

24 

ADD HL,HL 

25 

ADD HI..HL 


C89E 10 FI 
C8A0 18 E9 
C8A2 
C8A2 

C8A2 DD 7E 03 
C8A5 DD 96 01 
C8A8 0E 00 
C8AA CA BA C8 
C8AD 0E 23 
C8AF D2 BA C8 
C8B2 DD 7E 01 
C8B5 DD 96 03 
C8B8 6E 2B 
C8BA 
C8BA 3C 
C8BB 57 
C8BC 47 
C8BD 79 
C8BE 32 29 C9 
C8C121 00 00 
C8C4 4D 
C8C5 DD 7E 02 
C8C8 DD 96 00 
C8CB CA DD C8 
C8CE 2128 00 
C8D1 D2 DD C8 
C8D4 DD 7E 00 
C8D7 DD 96 92 
CSDA 21 D8 FF 
C8DD 
C8DD 3C 
C8DE 5F 
C8DF 2218 C9 
C8E2 22 25 C9 
C8E5 DD 6E 06 
C8E8 
C8E8 
C8E8 
C8E8 CS 
C8E9 DS 
C8EA DD 5E ei 
C8ED 16 ee 
C8EF 62 
C8F0 29 
C8F129 


26 


ADD HL.HL 

27 


LD BC，HL 

28 


ADD HL,HL 

29 


ADD HL,HL 

30 


ADD HL,BC 

31 


ADD HL,DE 

32 


LD BC, $0809 

33 


ADD HL,BC 

34 


POP DE 

35 

36 


POP BC 

37 


LD A, (COLOR) 

38 


LD (PS1 + 1),A 

39 


LD (PS2+1),A 

40 

; 


41 

LP 


A2 

PS1 


43 


LD (HL) . 6 

44 


LD A,C 

45 


ADD A,E 

46 


LD C, A 

47 

LPC 


48 


LD A,C 

49 


SUB D 

5t 


JP Z,LP1 

51 


JP C,LP2 

52 


LD C,A 

53 


PUSH BC 

54 

UYP1 

LD BC,0 

55 


ADD HL,BC 

56 


POP BC 

57 

PS2 


58 


LD (HL) , 0 

59 


JP LPC 

66 

LP1 


61 


LD C, 0 

62 


PUSH BC 

63 

UYP2 

LD BC,0 

64 


ADD HL,BC 

65 


POP BC 

66 

LP2 


67 


NOP 

68 


DJNZ LP 

69 


RET 


Xltu 「 bo/Z 用 

XI 用漢字 ROM 娜 BASIC 


Toyota Kazuki 

豊田和紀 


私は以前 XIF を愛用していました。デイ 
スクドライブ/漢字 ROM 内蔵でもれなく N 
EW BASIC がついてくる。当然それらを利 
用したプログラムをたくさん作りました。 
そしてある日，私は Xlturbo を手に入れま 
した。 XI の正しきユーザーである私は当然 
XI 時代に開発したプログラムを使おうと思 
います。ところが，そのとき悲劇は訪れた 
のです。 


「か，漢字が四角に化けた …… j 
賢明な読者ならすでにおわかりでしよう。 
そう， XI と Xlturbo では漢字 ROM のアド 
レスが違うのです。 XlturboTCZ -8 FB 01 
を走らせた場合， 

POSITION X，Y 

PATTERN 一 16, KANJIS ( CODE ) 
としても正しい表示はされません。この点 
が唯一 X 1 turbo のアツパーコンノヽ。チで ない 
ところといえるでしよう。 

そこで私はノーマルの X 1 turbo でも CZ - 
8 FB 01 で正しく漢字が表示されるようにし 
てみました。漢字表示だけでは芸がないの 
で，高解像度対応， PCG 高速アクセスモー 
ド対応もつけておきました。 


] 入力 S 使用法 [ 


プログラム はすべて BASIC で 書力、れてい 
ますので， BASIC からそのとおりに打ち込 


リスト 3 XI 漢字 ROM 対応 BASIC 修正部 


んでください。特に16進数のマシン語デー 
夕には十分に注意してください。打ち終わ 
ったら忘れずにセーブしておきましよう。 

実行方法です。まず ， FORMAT & SYS 
GEN で辛斤しいデ、 イスクを CZ -8 FB 01 のシ 
ステムテ、、イス クとします （NEW BASIC 可 >〇 
そして，先ほど打ち込んだ プログラムを 実 
行してください。あとは指示に従って BAS 
1 C を書き換えるだけです。 “ Complete ” と 
表示されたら書き換え完了。書き換えた機 
能がちゃんと動〈ことを確認するまでは大 
事なディスタは入れないように注意してく 
ださい。 

なお，当然のことながらこの書き換えは 
Xlturbo / Z でのみ有効です。 XI の人は使 
わないでください。 

Profile 

◊豊田さんは新潟県にお住まいの21歳，大学4年 
生です。マイコン歴は約5年，現在は Xlturbo 
Z のユーザーです。 


10 INIT：WIDTH 80 ： SCREEN：DEFINT A-Z：CLEAR &HEFFF ： BF=&HF000 
20 1 

30 CLS : LOCATE 0,0：PRINT "* BASIC CZ-8FB01* ) a イツタ Disk ヲ Drive 1 -イレテクタ • サイ • 

40 LOCATE 0,2 -.PRINT "HIT SPACE KEY" 

50 A$=INKEYS：IF A$=" " ELSE 50 

60 RC=16:"READ":F$=MEM$(BF+1,16> _ 

70 IF LEFT$IF$, 13) = "BASIC CZ8FB01" ELSE LOCATE 0,4 ：PRINT ••コノ Disk 'BASIC* 0 
•T; マセン .": BEEP ： END 

80 VR=VAL(RIGHTS(F$,2))/10：ON VR RESTORE "V10",”V20" 

90 » 

100 RC=&H20:"READ.. .ぃ 

110 READ MS ： MEM$(BF+1,2)=HEXCHR$(M$):MEM$(BF+&H34,2)=HEXCHR$("C0 0A ) 

120 "WRITE" 

130 » 

140 1 PCG ROUTINE & KANJI READ SUB 
150 * 

160 RC=&H2A:”READ" 

170 MBM$(BF4&HAB, 5)=HEXCHR$( m D5 D9 C5 D5 E5") „ " 

180 MEM$(BF+&HB0,16)=HEXCHR$("CD DD 0A D9 04 ED A3 0C 0C 15 C2 B4 0A 1814 00 

190 MEM$(BF+&HC0,16)=HEXCHR$("C5 D5 D9 C5 D5 E5 CD DD 0A D9 ED A2 04 0C 0C 15 

200 MEM$(BF+&HD0,16)=HEXCHR*("C2 CA 0A FB D9 El D1 Cl D9 D1 Cl C9 00 D9 E5 01 

210 MEM$(BF+«cHE0,16)=HEXCHR$( "D0 IF 3E 20 ED 79 01 FF 3F AF ED 79 06 37 ED 51 

220 MEM$(BF+&HF0,16)=HEXCHR$("7B FE 14 26 00 28 02 26 20 06 27 ED 6143 0E 00 

230 "WRITE" : RC=RC+1 ： "READ" 


2 2 ) 

+2 X ) 2 o 
X)X0TX + 4 
I X T 4 s I X - 
Acp >L(IS f #(1 • 
A » » » L L - #( » L c f(L 
D B A (H c A ZHNA H 
l/B B 


2 。 


F 9 n 
F 0 1 


》 4 9 9 9 C 


c c 0 

19 0 

02AAF 5191 
r9CD4c00c 


9 0 

c 0 

0 D 0 0 


0 c 0 0 c 


2356789 CDEFF 258888 ABCDDEP 

FFFFFFFFFFFF 00000000000001111111112222222222 
SSSSS8SS 888899999999999999999999999999999999 

cccccccccccccccccccccccccccccccccccccccccccc 


SHORT ACCESS 137 





















240 MEM$(BF ,16)=HEXCHR$("16 08 El D9 F3 C9 00 01 00 141610 ED A2 04 0C") 

250 MEM$(BF+tH10,16)=HEXCHR$( M 15 20 F9 C9 00 00 00 00 00 00 00 00 00 CD IB 00") 
260 MEM$(BF+&H20, 6>=HEXCHR$("C5 06ID ED 41 C9 M ) 

270 "WRITE" 

280 » 

290 1 KANJI READ ROUTINE 
300 ' 

310 READ R$,A$ ： RC=VAL("&H"+R$) : "READ" ： OF=BF+VAL( n &H"+A$) 

320 MEM$(OF ,16)=HEXCHR$("C6 20 5F 7D C6 20 57 D5 01 09 00 1114 0B 2118") 

330 MEM$(OF+4H10,16)=HEXCHR$("00 ED B0 01 09 00 1118 00 21ID 0B ED B0 D1 01") 

340 MEM$(OF+&H20,16)=HEXCHR»("B6 2F DF 30 0311 00 80 01 D0 IF 3A E3 0A C6 40") 

350 MEM$(OF+4H30,16)=HEXCHR$("ED 79 01 FF 37 ED 59 06 27 AF ED 79 06 3F 7A E6") 

360 MEM$(OF+&H40,16)=HEXCHR$( M 9F ED 79 01 09 00 1118 00 2114 0B ED B0 El CD") 

370 MEM$(OF+4H50,12)=HEXCHR$("07 0B 01 FF 3F CB F7 ED 79 CD 07 0B") 

380 "WRITE" 

390 * 

400 * START UP ROUTINE (CRTC DATA) 

410 1 

420 READ R$ ,A$ ： RC=VAL( "&H"+R$ ) : "READ" ： OF=BF+VAL( ,, fcH ,, +A$) 

430 READ M1$,M2$ 

440 MEM*(OP ,16)=HEXCHR$("31 00 00 01 F0 IF ED 78 E6 0120 10 21"+M1$+"11") 

450 MEM$(OF+4H10,16)=HEXCHR$("DD 00 0114 00 ED B0 3E 23 32 E3 0A 21"+M2$+”11"> 

460 MEM$(OF+ftH20,16)=HEXCHR$("01 00 01 02 00 ED B0 C3 FA 00 35 28 2D 84IB 00") 

470 MEM$(OF+«cH30,14)=HEXCHR$("191A 00 0F 00 00 00 00 00 00 6B 50 59 88") 

480 ” WRITE" 

490 1 

500 IF VR=1 THEN 630 
510 * 

520 * NEW BASIC PCG PATCH 
530 1 

540 RC=&H9C:"READ，. 

550 MEM$(BF+&H1A, 6)=HEXCHR$("IE 15 CD 33 00 1C") 

560 MEM$(BF4iH20,16)=HEXCHR$("CD 33 00 1C CD 33 00 C9 00 00 00 00 00 00 00 00") 

570 MEM$(BF+&H30,16)=HEXCHR$("00 00 00 00 00 00 00 00 00 00 00 00 IE 15 CD 2B") 

580 MEM$(BF+iH40,16)=HEXCHR$( M 00 1C CD 2B 00 1C CD 2B 00 C9 00 00 00 00 00 00") 

590 MEMKBF+4H50,16)=HBXCHR$("00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00") 

600 MEM$(BF+&H60, 9)=HHXCHR$("00 00 00 00 00 00 00 00 00" ) 

610 "WRITE" 

620 ' 

630 LOCATE 0,4：PRINT "Completed !”：CLEAR &HFEFF：END 
640 » 

650 LABEL "V10" 

660 DATA 80 A7,A6,94,C7,80,AA A7,A8 A7 
670 ' 

680 LABEL "V20" 

690 DATA 00 BF,91,0D,DF,00,2A BF,28 BF 
700 » 

710 LABEL "READ" 

720 DEVI$ "l ： ,, ,RC f Dl$,D2$ 

730 MEM$(BF,128)=D1$ ： MEM$(BF+128,128)=D2$ 

740 RETURN 
750 » 

760 LABEL "WRITE" 

770 D1$=MEM$(BF,128) ： D2$=MEM$(BF+128,128) 

780 DEVO$ "1: M ,RC,D1$,D2$ 

790 RETURN 


《広告の半べージ》 やっぱりウソくさいけど本当に売ってます > 

旧回- 

月刊 娜倶楽部 第2号発壳 

SHD テイスクに入った XB 8000 のための雑誌だっ/ 

グラフィック怪奇大作戦！ 

縦横比 1 X 1 で65536色使う方法 

新企画：捉破りの二股連載 『 C 調言語講座 PRO -68 K 』 

ありがちな企画だけど『軍人将棋』，『チンチロリン PRO -68 K 』 

パブリック•ドメイン•データ計画具体的発動 『PDD ノススメ』 


PDS 

•ファイル複写，削除ツール ASKCOPY . X と ASKDEL.X 
•電話番号をピポパするトーン•ダイアラー.デバイス TELDRV.SYS 

❿ TERM. X _，土げブ〇グラム 
• 『即戦力 j 文叢コン 

編集長祝一平からの御挨拶「ど一だ， 


満開製作 


ど-だ，第曆出るそ。第_ 

「所電脳 H 


BASIC 外部関数 


〒171東京都豊島区要町1 一3—24三浦ビル 3 F 
TEL .(03)554_9282 ( いたずら電話はしないでね） 


•これでつ^ドコビーも天下_ ! 

グ|フィックをチキスト VRAM に如、する gtot ( )，_面のハードコピーを取る hcopyU 

• BA _ e そ•作った MML が 0 PM ド♦イバ用のファイルになってしまう 
ファイル•コンバート•パッケージ FMUSIC.FNC 

•キーボードがキーボードになる。これで，あなたも演奏家。パンパンパン！ 

8 重和音サポート! kb_play() 

• スキヤナを BASIC からコントロール 
天下無敵のカラースキヤナ： CZ -8 NS 1 のためのドライバ間数 

• IJ 付け，ファイルサイズ，属性なんかをウハウハしてしまう 
ファイル情報を取り出す fattr () 

• その他 pause ( )， tiiae ( ••ど， ^ .の間数群人脊米级 

なお，_は一部変更され冬ことがありま末御了承$ださい.， 

卜。 第1 号が出て第 2、号が 出れば 帰納法に よって第 3 号 も出るそ j 

販売方法は通信販売のみです。お申し込みの方法は左記の住所へ現金書留で 

定期購読8力月分8,000円(郵送料サ-ビス） 

(創刊号にさかのぼってお申し込みの場合は，その点を御明記ください） 

郵便振替を御利用の場合は口座番号「東京 5-362847 满開製作所 j でお願いいたします。 

(振替を御利用の場合は発送までに10日以上かかります） 


138 Oh ! X 1988.7. 










• SLANG 入門後編 

今回は SLANG の配列，間接変数などを取 
り扱います。ポインタの考え方など， BASIC 
しか扱ったことのない方にはわかりにくい 
部分もあるかもしれません。しかし，こう 
いった概念を会得することは，あらゆるプ 
ログラム言語を扱ううえでも参考になるで 
しょ*5。 

そのほか， SLANG の基本的な部分は C 言 
語と似たようなものですので，今月の特集 
記事を参考にしてみてください。 

鲁ウインドウパッケージ 

マルチ ウィンドウは WALRUS でも使われて 
いましたが，今回は汎用に作られたパッケ 
ージです。が，完全な マルチ ウィンドウ処 
理というわけではなく，いわばポップアッ 
プウィンドウといった感じのものです。特 
定キーを指定してやればキー入力時にアル 
ゴ機能モドキを作ることも簡単でしょう。 
MZ - 2500 のようにメモリに余裕はありませ 

全機種共通システム掲載記事 

■85 年6月号 
序嫌 共通化の試み 

第 I 部 S - OS “ MACE " 

第2部 Lisp -85 インタプリタ 
第3部チェックサムプログラム 
■85 年7月号 

第4部マシン語プログラム開発入門 
第5部エディタアセンブラ ZEDA 
第&部デバッグッール ZAID 
■85 年8月号 

第7部ゲーム開発パッケージ BEMS 
第8部ソースジェネレータ ZING 
■85 年9月号 

インタラプト S - OS 番外地 
第9部マシン語入カッール MACINTQ - S 
第10部 Lisp - 85入門⑴ 

■85 年10月号 

第丨丨部仮想マシン CAP - X 85 
連載 Lisp -85 AF 1(2) 

■85 年 II 月号 
連黻 Lisp -85 入門 (3) 

■85 年12月号 
第12部 Prolog -85 発表 
■86 年 I 月号 

第13部リ□ケータブルのお話 
第14部 FM 音源サウンドエディタ 

■ 86 年2月号 

第 15部 S-OS “ SWORD " 

第16部 Prolog - 85入門⑴ 

■86 年3月号 
第17部 magiFORTH 発表 
連載 Prolog -85 入門 (2) 

■86 年4月号 

第18部思考ゲーム JEWEL 
第 19部 LIFE GAME 
illlc 基礎からの magiFORTH 
連戡 Prolog -85 入門 (3) 

■ 86 年5月号 

第20部スクリーンエディタ E-MATE 
連載 実戦演習 magiFORTH 

_86年6月号 
第21 部 Z 80 TRACER 
第22部 magiFORTH TRACER 
第23部ディスクダンプ&エディタ 
第24部 “ SWORD " 2000 0 D 
連敢 対 IS で学ぶ magiFORTH 


連載構造化言語 SLANG 入門 (2) 

第67部マルチウインドウドライバ MW 


んから，プログラムを常駐させることは難 
しそうですが， MEMAX を書き換えてメモリ 
を確保しておきメニューに応じてデバイス 
から読み込むというのが妥当なところでし 
ようか。このほかにもこのパッケージを使 
用したアプリケー シヨン がいろいろと考え 
られるでしよう。ト ランジェン ト コマンド 
のような 扱い も面白いかもしれません。 

メモリの関係上，仮想画面上の情報保護 
といったことは現実的ではありませんから， 
こういった感じのものになるのはやむをえ 
ないでしよう。なかなかしっかり作られて 
いますが，まだ未開拓の分野ですので改良 
すべき点もあるかもしれません。皆さんの 
意見をお待ちします。 


特別付録 PC -8801 版 S-OS " SWORD " 
■86 年7月号 


第25部 FM 音源ミ」 


-ジツクシステ厶 


付録 FM 音源ボードの製作 
連載 計算カアップの magiFORTH 

mmn smc -777 kss - os “ sword " 

■ 86 年8月号 

第26部対局五目並べ 
第27部 MZ - 2500版 S - OS “ SWORD " 

■86 年9月号 

第28部 FuzzyBASlC 発表 
連載 明日に向かって magiFORTH 

■86 年10月号 

第29部ちよっと便利な拡張ブログラム 
第30部ディスクモニタ DREAM 
第31部 FuzzyBASIC 料理法く 1> 

■86 年"月号 

第32部パズルゲーム HOTTAN 
第33部 MAZE in MAZE 
連載 FuzzyBASIC 料理法 <2> 

■86 年12月号 

第34部 CAS し & COMET 
連載 FuzzyBASIC 料理法 <3> 

■ 87 年 I 月号 

第 35 部マシン語入カツール MACINTO-C 
連載 FuzzyBASIC 料理法 <4> 

■ 87 年2月号 

第36部アドベンチャーゲーム MARMALADE 
第37部テキアベ作成ツール CONTEX 

■ 87 年3月号 

第38部瘋； i 使いはアニメがお好き 
第39部アニメーションツール MAGE 
付録 “ SWORD " 再掲載と MAGIC の標準化 

■ 87 年 4 月号 

第40部 INVADER GAME 
第41 部 TANGERINE 

■ 87 年5月号 

第42部 S - OS “ SWORD " 変身セット 
第43部 MZ -700 用" SWORD " を 0 D 対応に 
動7年 6月号 

インタラプトコンパイラ物語 
第 44 部 FuzzyBASIC コンパイラ 
第 45 部エディタアセンブラ ZEDA-3 
_87 年 7 月号 
第 46 部 STORY MASTER 


•なぜか突然アルギース 

さて，今月の ゲーム レビューでも取りあ 
げられている「アル ギース の翼」ですが， 
エンデイングに Oh ! MZ の文字があるのを不 
思議に思った方がいるかもしれません（ま 
だ解き終わってないかもしれませんが）。 
このゲームの 移植はなんと S-OS “ SWORD ” 
上で ZEDA と E - MATE を使って行われていま 
す。 CP / M よりも使いやすかったというのが 
理由のようですが，なんとも驚きですね。 
ボード上の CTC を判別して CTC 搭載ボードが 
あればノーマル XI でも動作したり，背景 
が PCG 化され88版よりもチラツキのない画 
面になっていたりと，なかなかよい移植が 
されているようです。まずはひと安心かな。 


■ 87 年8月号 

第47部パズルゲーム碁石拾い 
第48部漢字出カパッケージ JACKWRITE 
特別付録 FM -7 Q 7 版 S -0 S “ SW 0 RD ” 

■ 87 年9月号 

第49部リロケータブル逆アセンブラ Inside-R 
特別付録 PC - 8001 /880 I 版 S -0 S " SW 0 RD " 

■ 87 年10月号 

第50部 tiny CORE WARS 
第51部 FuzzyBASIC コンパイラの拡張 
第52部 XI turbo 版 S -0 S “ SWORD " 

■87 年丨丨月号 

序論 神話のなかのマイクロコンピュータ 
付録 S -0 S の仲間たち 

第53部もうひとつの FuzzyBASIC 入門 
第54部ファイルアロケータ& ローダ 
インタラプト S -0 S こちら集中治療室 
第55部 BACK GAMMON 
_87年12月号 

第56部タートルグラフィックパッケージ TURT じ I 
第57部 Xlturbo 版“ SWORD " アフターケア 
ラインプリントルーチン 
特別付録 PAS 0 PIA 7 版 S -0 S “ SW 0 RD " 

■88 年 I 月号 

第58部 Fuzzy BASIC コンパイラ.奥村版 
付録 石上版コンパイラ拡張部の修正 

■88 年2月号 

第59部シューティングゲーム ELFES 
_88年3月号 

第60部構造型コンパイラ言語 SLANG 
■88 年4月号 

第61部デバッギングツール TRADE 
第62部シミュレーションウォーゲーム WALRUS 
■88 年5月号 

第63部シューティングゲーム ELFES 11 
第64部地底最大の作戦 
■88 年6月号 

第65部構造化言語 SLANG 入門⑴ 

第66部 Lisp -85 用 NAMPA シミュレーション 


* 以上のアプリケーションは，基本システムてあ 
る S-OS ’ MACE " または S - OS “ SWORD ••がないと 
動作しませんのでご;主意ください， 
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全機種共通 S - OS “ SWORD ” 要 


配列と間接変数を使う 

大貫信昭 Ohnuki Nobuaki 


はじめに 


今回は，間接変数と配列の扱い方につい 
て説明しましよう。 

前回説明しましたように， SLANG では 
なにもかも関数として記述します。局所的 
な変数や配列を使えば，名前の重複を気に 
しなくてすみますし，ほかの関数に影響を 
与えずに仕事だけをしてくれる関数を書く 
ことができます。このような関数は引数に 
なにを与えてやり，どんな仕事をしてくれ 
るかという仕様さえわかっていれば，関数 
の中身について一切考える必要がありませ 
ん。これを関数の「ブラックボックス化」 
といいます。関数を「ブラックボックス化」 
すると余計なことを考えずにすみプロダラ 
ミンダの負担が減りますし，その関数はラ 
イブラリとしてほかのプログラムにもその 
まま使えますから，便利なことこのうえあ 
りません。 SLANG のプログラミングに慣 
れてきたら， • 関数の「ブラックボックス化」 
を心がけてください。 

さて，ある関数内の局所的な変数や配列 


は，ほかの関数からアクセスすることがで 
きません。となると少し困ったことが出て 
きます。たとえば，引数として与えた局所 
的な配列の要素を参照したり変更したりす 
る関数は書けないことになってしまいます e 
SLANG では，文字列を配列として扱い， 
BASIC のように文字列を操作する組み込み 
関数などありませんから，このような関数 
が書けないと事実上局所的な配列は使えな 
い，文字列も扱えないということになりま 
す。 

そこで登場するのが間接変数で，これを 
使えばこのような関数も簡単に書くことが 
できるのです。間接変数は FuzzyBASIC の 
変数の扱いとほぼ同じで，変数としても配 
列!：しても扱えます。たとえば， POINT を 
1バイト型の間接変数として宣言し， 
POINT = $ D 000; 

VARA = POINT [0]; 

VARB = POINT [1]; 

のようにすると， VARA , VARB にはそれ 
ぞれ DOOOh ， DOOIh のメモリの内容が代入 
されます。 SLANG には専用の変数や配列 
がありますので，これはいったいなにに使 


リスト1配列の使い方 


1 // 

2 // 配列 

3 // 

4 MAIN() 

5 ARRAY 

6 BYTE ARY1[3]={ 

7 0 ， 1 ， 2,3 (* 10],[11,12],[3] *) 

8 ), 

9 BYTE ARY2[2J={ 

10 4 (* [0],[1],[2] *) 

11 )； 

12 

13 VAR I ； 

14 

15 BEGIN 

16 PRINT ( "ARYl : ; 

17 PRINT(HEX4$(ARY1 ))； 

18 PRINT ( ハ； 

19 // 

20 PRTARY(ARY1,3 )； 

21 ADDARY(ARYl,3,4 )； 

22 PRTARY(ARY1,3 )； 

23 // 

24 PRINT("ARY2 ：")； 

25 PRINT(HEX4$(ARY2 ))； 

26 PRINT (/)； 

27 // ' 

28 PRTARY(ARY2 f 2 )； 

29 ADDARY(ARY2,2,4 )； 


30 PRTARY(ARY2 f 2 )； 

31 END ； 

32 // 

33 // 

34 PRTARY( BYTE ARY[], N ) 

35 VAR I ； 

36 

37 BEGIN 

38 FOR 1=0 TO N { 

39 PRINT("[",1，"I :")； 

40 PRINT(ARY[I ])； 

41 PRINT ( ハ； 

42 } 

43 PRINT (/)； 

44 END; 

45 // 

46 // 

47 ADDARY( BYTE ARY[J, N, DATA ) 

48 VAR I; 

49 

50 BEGIN 

51 FOR 1=0 TO N { 

52 ARY[I]=ARY[I]+DATA ； 

53 } 

54 END; 

55 // 

56 // END 

57 // 


今回は C 言語ライクな配列と間接変数の使 
用法を中心により高度な使い方や SLAN 
G の拡張法などを見てみましよう。残念な 
がら SLANG 入門は今回で終了ですが，機 
会があれば飛び入り講座なども開けるかも 
しれません。大貫さん，お疲れさまでした。 


うのかなと疑問に思った方もいるでしよう。 
間接変数は引数として渡された配列を関数 
内でアクセスするのにもっとも威力を発揮 
します。 


配列と間接変数 


それではサンプルプログラム，リスト1に 
沿って間接変数と配列の具体的な使い方を 
説明していきましよう。リスト1は配列の 
各要素に4を加え，変更前と変更後を表示 
するプログラムです。なぉ入力する際，文 
カツコの I 丨が使えない機種では [] など 
で代用してください。 

まず初めに1バイト型の配列 ARYliiA 
RY 2 を宣言し，同時に配列要素の初期化も 
行っています。 ARY 2の要素は3個あり 
ますが，初期値は1個しかありません。こ 
の場合，残りの2個は0に初期化されます。 

配列名は配列が格納されているアドレス 
を値として持っています。もちろん変数で 
はありませんから代入はできませんが，参 
照することはできます。17行のように， 
PRINT ( HEX 4$( ARY 1)) : 

などとすれば，配列 ARY 1が格 
納されているアドレスを表示す 
ることができるのです。 

PRTARY は1バイト型配列を 
表示する関数ですが，引数とし 
て配列のアドレスと要素の数を 
渡しています。 SLANG では引 
数として16ビツトの値しか扱え 
ませんので，配列をまるごと渡 
すことができません。ですから 
代わりに配列が格納されている 
アドレスを渡してやるわけです0 
アドレスさえわかれば， m 数侧 
でアクセスすることができます 
が， PRTARY の場合要素の数 
も必要なので一緒に渡していま 
す。 

PRTARY の関数定義を見て 
ください。仮引数が， 
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BYTE ARY [] 

となっていますが，これが実引数として渡 
された配列のアドレスを受け取る部分で， 

1バイト型の間接変数 ARY に配列のアド 
レスが代入されます。このように仮引数に 
間接変数を使えば，実引数として渡された 
配列を配列の形で直接アクセスできます。 
たとえば20行のように， 

PRTARY ( ARY 1,3) ; 

として関数 PRTARY を呼び出すと，間接 
変数 ARY には配列 ARY 1のアドレスが代 
入され40行のように 
PRINT ( ARY [ I ]) ; 

などとすれば， ARY 1 [ I ]の内容を表示す 
ることができるわけです。しかも ARY [ I ] 
というのは ARY 1 [ I ]のコピーではな〈実 
際に ARY 1 [ I ]をアクセスしていますので， 
ARY [ I ] に数値を代入すれば ARY 1[ I ]の 
内容も変更されます。このことを利用した 
のが，次の ADDARY という関数で，実引 
数として渡された配列の各要素の値に3番 
目の引数として与えられた値を加えていま 
す。 

間接変数を宣言する場合（仮引数も局所 
宣言の一種です）注意しなければならない 
のは，ふつうの変数の場合と速って変数名 
のみを書けばよいのではなく，型の指定!： 
変数名の後ろに [] が必要だということで 
す（間接変数だとコンパイラにわからせる 
ため)。仮引数として間接変数を使用する場 
合は，型を実引数の配列の型に合わせる必 
要があります。実引数が1バイト型なら，仮 
引数も1バイト型にしなければなりません。 
2次元配列も考え方はほぼ同じです。リ 


スト2を見てください。リスト1同様最初 
に配列の宣言と初期化を行っています。 
初期化のしかたは1次元配列と同じなので 
すが， DATA という配列は2バイト型なの 
で初期値の前に％がついています。％を取 
ると1パ、イト型の値となってしまいますの 
で，2バイト型の配列を初期化する場合は 
気をつけてください（私もしょっちゅう％ 
をつけ忘れる)。 

PRTARY 2 は2次元配列を表示する関数 
ですが，実引数として2次元配列を渡す場 
合は仮引数も2次元の間接変数を使用しま 
す。2次元の間接変数は， 

型間接変数名[行][列] 

の形で宣言しますが，行の値は意味を持た 
ないので，ふつう19行のように行を省略し， 
WORD ARY [ ] [3] 

のように書きます。いい方を変えると「列 
の値は必ず書かなくてはいけない」という 
ことです。このようにすれば25行のように， 
実引数として渡された2次元配列を2次元 
配列の形で直接アクセスすることができま 
す。 

この間接変数を発展させたものが C 言語 
のポインタという考え方なのですが ， SLA 
NG ではそこまで徹底していません。せい 
ぜい「ポインタもどき」といったところで 
す0間接変数はうまく使えばプログラムが 
コンパクトで わかりやすくなりますが，使 
いすぎると作った本人にさえ理解できない， 
それこそ神のみぞ知るといったプログラム 
ができあがってしまいます。今回の例のよ 
うな使い方が妥当なところでしょう。 

さて，もうすでに SLANG でプログラム 


を組んでいる方も多いと思いますが， IF 文 
などで間違っていないはずなのに Illegal 
name (名前の誤使用）のエラーが出たこと 
はないでしようか？リスト3を見てくだ 
さい。文カツコに I を使用する場合は問_ 
ないのですが， [ や（の場合，直前が変数 
名などで間に空白などの区切りがないと， 

コンパイラはその変数を配列や関数と勘違 
いしてしまい エラーに なってしまうのです。 
SLANG には配列名と [ ，関数名と （ の間 
に空白を置いてはいけないという規則があ 
ります力 ? ，逆にいえば，名前の直後に[や 
( を置けばその名前がたとえ変数名だった 
としてもコンパイラは配列や関数として扱 
ってしまう，ということです。 

このことには コンパイ ラ制作中に気がつ 
いていたのですが，間接変数などとの関係 
で簡単に修正できず，またエラー {> 出るの 
であまり実害はないだろうと判断して，そ 
ういう仕様のままにしておきました。とこ 
ろが私は通常，文カツコに I 丨を使用しま 
すし，1の前に空白を置くクセがついてい 
ますので，その仕様自体をいつの間にか忘 
れてしまい，したがってリ フアレンスマニ 
ユアルからも当然のごとく抜けてしまった 
のでした。悩まれた方ゴ メンナ サイ。文力 
ツコに[や （ を使用する場合は直前に空白 
を置く力、粂件式を （） でくくってください。 

同様にこちらの場合はあまりないと思い 
ますが，変数名などの直後に （* コメント 
*) を置く場合にも直前に空白が必要です。 
これらはハツキリいえばバグなのですが， 
作った本人がそういう仕様だといい切って 
しまえば，もはやバグではないのだ。そう， 
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リスト2 2次元配列の例 


リスト3正誤例 


1 // 

2 // 2 次元配列. SL 

3 // 

4 MAIN() 

5 ARRAY 

6 WORD DATA[2] [3]={ 

7 %0, %1, %2, %3, H [0110], [0H13,[0][2],[0][3] 

8 %4, %5, %6, %7, // [1][0],[1][11,11][2],[1][3] 

9 %8, %9,%10,%11 // [2]10],[2][1J,[2][2] ,[2][3J 

10 }； 

11 

12 VAR I ； 

13 

14 BEGIN 

15 PRTARY2(DATA,2 )； 

16 END ； 

17 // 

18 // 

19 PRTARY2(WORD ARY[J13 J,N) 

20 VAR I,J ； 

21 BEGIN 

22 FOR 1=0 TO N { 

23 FOR J=0 TO 3 { 

24 PRINT ( M l",I, n ]t ，， ,J. ，， l ：••); 

25 PRINT(ARY[IJ[J j )； 

26 PRINT (/)； 

27 } 

28 } 

29 END ； 

30 // 

31 // END 

32 // 


// 

// 私が锭だ！！ .SL 
// 

MAIN() 

VAR A,B ； 

BEGIN 

IF A{ BEEP ()； } 

// IF Al BEEP()；] 

// IF At BEEP()；) 

IF A { BEEP" ; } 
IF A [ BEEP ()； J 
IF A ( BEEP()；) 

A = B / 本コメント本/ +1; 
// A=B< 本コメント本） +1; 

A=B /本 コメント */+1 ； 
A=B (本 コメント 本） +1; 
END ； 

// 

// END 
// 
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私が徒だ！！ウーム，なんて恐ろしい世界 
だろう。 SLANG のプログラムは，どうか 
五月ちゃんやメイちゃんのように伸び伸び 
と，空白を入れて見通しよく書いてくださ 
い。人が見てもわかりにくいようなプログ 
ラムは，コンパイラにもわかりにくいので 

す0 


SLANG のテクニック 


応用編として， 2つばかりちょっとした 
テクニックを紹介しましょう。マシン語の 
知識も必要ですので，初心者の方には難し 
いかもしれません。 

リスト4は任意個数の引数を持つ関数の 
書き方の例です。 SLANG では引数の数を 


チェックしていますので，通常の方法では 
C 言語の printf のような引数の個数が決ま 
っていない関数を書くことができません。 
そこで MACHINE 宣言で引数の数を省略し 
たマシン語関数として宣言します。こうす 
れば引数の数のチェックは行われません。 

問題はどうやって引数をアクセスするか 
ですが，29行を見てください。この GETR 
EG という関数がミソです。 GETREG はそ 
.の時点のレジスタの値を へ A や A HL などの 
変数に代入する組み込み関数です。引数の 
数を省略して宣言したマシン語関数の場合， 
引数をスタックに積んで，引数の数は HL 
レジスタに代入されますから，変数 、 HL に 
は引数の数が代入されることになります。 

動的な局所変数や配列を使用する場合は 


リスト4任意個の引数を使〇 


1 // 

2 // 任意個数の引数を持つ閭数 

3 // 

'4 // 任意個数引数 .SL 

5 // 

6 MACHINE SUBU; 

7 

8 MAIN() 

9 BEGIN 

10 PRINT( ,, ¥n¥nSUB( 1,2,3) ； ¥n¥n ")； 

11 

12 SUB(1,2,3 )； 

13 // 

14 PRINT("¥n¥nSUB(4,5,6 f 7,8) ； ¥n¥n ")； 

15 

16 SUB(4,5,6,7 ， 8>; 

17 END ； 

18 // 

19 // 

20 SUB() 

21 VAR N, WORD ARGt] : 

22 

23 VAR I; 

24 

25 BEGIN 

26 VAR DUMMY ； <* 動的 局所 変数 


27 // 

28 // 

29 GETREG ()； 

30 N=~HL; 

31 ARG="SP+4 + "HL*2 ； ある場合 *} 

32 // ARG= / 'SP+2 + "HL*2 ； (* ない場合*) 

33 // 

34 // 引数の数 

35 // 

36 PRINT( " ARG COUNT ： ”， N , "¥n¥n" > ; 

37 // 

38 IF N==0 RETURN ； 

39 U 

40 // 引数の值 

41 // 

42 FOR 1=1 TO N { 

43 PRINT( 

44 ” NO.",I, ° ARG : 

45 ARGt-I], 

46 / 

47 )； 

48 ) 

49 END ； 

50 // 

51 // END 

52 // 


リスト 5 コマンドの例 


1 

// 



38 

ABORT(1) 

(拿 

HL：ERRNO 


2 

// 

コマンドラインから引数を受けと 

る 

39 

BEGIN 




3 

// 



40 

C0DE($7D )； 

(* 

LD A,L 

*) 

4 

// 

CMD.SL 


41 

STOP ()； 




5 

II 



42 

END ； 




6 

// 

# CMD: ハ*ラメータ 


43 





7 

// 



44 

#ENDIF 




8 

CONST AB0RTN0=3 ； ( 本 1 or 2 or 3 

* ) 

45 

// 




9 




46 

// 




10 

#IF 

ABORTNO==l 


47 

// 




11 




48 

#IF AB0RTN0==2 




12 

MACHINE ABORT{1 )； 


49 





13 




50 

ABORT( ERRNO ) 




14 

#ENDIF 


51 

BEGIN 




15 




52 

CODE{ 




16 

MAIN() 


53 

[ERRNO], 

け 

HL：ERRNO 

*) 

17 

VAR BYTE ARG[J ； 


54 

$7D 

け 

LD A,L 

*) 

18 




55 

) ； 




19 

VAR I; 


56 

STOP {)； 




20 




57 

END ； 




21 

BEGIN 


58 





22 


GETREG ()； ARG= A DE; 


59 

#ENDIF 




23 

// 



60 

// 




24 


FOR(I=0 ； ARG[I]<>0 ； 1++) { 


61 

// 




25 


\ 


62 

// 




26 


PRINT( CHR$( ARG[I])) ； 


63 

#IF AB0RTN0==3 




27 


} 


64 





28 

" 



65 

ABORT( ERRNO ) 




29 


IF I==0 ABORT(14 )； 


66 

BEGIN 




30 

// 



67 

•'ArERRNO ； 

CALL( &STOPH 

)； 

31 

32 


PRINTm; 


68 

END ； 




END ； 


69 





33 

// 



70 

#ENDIF 




34 

// 



71 

// 




35 

// 



72 

// END 




36 

#IF 

ABOHTNO==l 


73 

// 





37 


図1スタックの様子 




SP+4 


SP 


引数I 


引数2 


引数3 


リターン 


引数が3個の場合 HL=3 


関数の頭で IY レジスタを保存するためスタ 
ックに PUSH しますから，スタックの様子 
は図1のようになっています。変数 3 P に 
はスタックボインタの値力 ? 代入されていま 
すから，31行のように， 

ARG =、SP + 4 + ^HL 氺 2; 

とすれば，間接変数 ARG には図1の①のア 
ドレスが代入されます 0 こうすれば， n 番 
目の引数は， 

ARG [- n ] 

でアクセスすることができます。たとえば 
2番目の引数の値を表示したいのなら， 
PRINT ( ARG [-2]) ; 

とすればよいのです。数値にマイナスがつ 
くことと， ARG を必ず2バイト型の間接変 
数として宣言することを忘れないでくださ 

い0 

動的な局所変数や配列を使用しない場合 
は IY レジスタの退避は行われませんから， 
32行のように， 

ARG ピ SP + 2 + ^HL 氺 2; 

となります。 

変身セット用のトランジェントコマンド 
を SLANG で書くことができます。リスト 
5はその例で，コマンドラインから与えら 
れたパラメータをそのまま表示します。マ 
シン語プログラムをトランジヱントコマン 
ドとするには，コマンドラインか らハ 。ラメ 
ータを受け取ることと， エラーの 場合 A レ 
ジスタに エラー 番号をセットし，キヤリフ 
ラグを立てて戻ることの2つの条件を満た 
さなければなりません。 

コマンドラインからパラメータを受け取 
るのは非常に簡単です。トランジェントコ 
マンドが呼び出されたとき， DE レジスタは 
パラメータの先頭のアドレスを指していま 
す。 SLANG では実行時レジスタをまった 
くいじらずに関数 MAIN を呼び出しますか 
ら， MAIN の先頭で22行のように， 
GETREG ( ) : ARG = ^ DE ; 

とすれば，1バイト型の間接変数 ARG に 
パラメータのアドレスが代入されます。し 
たがって， ARG [0] が1文字目， ARG [1] 
が2文字目，……となります。値が0なら， 
コマンド ラインの終わりです。 
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エラーのとき，キヤリフラグを立てて戻 
るのも簡単で，単に STOP () で終了すれば 
よいのです。 SLANG では， STOP () で終 
了した場合のみキヤリフラダが立つように 
なっています。 

A レジスタにエラー 番号を セ ット する 方 
法は，何通りか考えられます。ここでは， 

A レジスタに値をセットして STOP () で終 
了する関数 ABORT を3種類ほど用意して 
みました。好きなものを使ってください。 

1番目の ABORT はもっとも省メモリタ 
イプですが，プログラムの最初で MACHI 
NE 宣言をしなくてはなりません。 STOP () 
のように引数を持たない関数の呼び出しは 
CALL 命令だけが生成されますから，直前 
で A レジスタに値を代入してやればいいわ 
けです。 

2番目の ABORT はほぼ1番目の ABOR 
T と同じですが，こちらは MACHINE 宣 
言の必要がありません。 

3番目の ABORT はもっともスマートな 
もので， CALL 関数を使用しています。 CA 
LL 関数はレジスタに値をセットしてマシン 
語のルーチンを呼び出すための組み込み関 
数ですから，変数汶に値を代入すれば A レ 
ジスタに値がセットすることになります。 
わかりにくいと思われるのは， 

& STOP () 

というところでしよう。&は演算子のひと 
っで， 

&変数名 

とすれば変数の格納されているアドレスを 
取り出しますが， SLANG では関数名やラ 
ベル名にも使用することができます。関数 
名に使用する場合は引数を持つ持たないに 
かかわらず 
&関数名 （） 

という形で使用します。 & STOP () は STO 
P () という関数のアドレスを指しますから， 
CALL (& STOP ()) ; 

とすれば， STOP () を呼び出せるわけです。 
もっともこれは， STOP が引数を持たない 
関数だから可能なのであって，引数を持つ 
関数の場合はこの方法は使えません。 

最後に，ランタイムルーチンを拡張する 
方法を説明しましよう0ランタイムルーチ 
ンを拡張するのはマシン語のプログラムを 
組める方でないと無理ですし，そのくらい 
の力がある方ならば SLANG の ソース リス 
卜を見れば，だいたいの見当がつくと思い 
ますので，簡単に説明します。 

まず，記号定数や外部のマシン語ルーチ 
ン（ほかのパッケージなど）を関数として 
登録する場合です。この場合はランタイム 


ルーチンを追加する必要がありませんので 
非常に簡単です。 66 E 0 h から始まる組込 T 
BL 1 というテーブルに追加すれば OK です。 
追加するデータは登録ずみのものを参考に 
してください。 

次はランタイムルーチンを追加する場合 
です。この場合は 67 AFh からの組込 TBL 2 
にデータを追加します。 マシン 語ルーチン 
はランタイムルーチンの最後から続け，最 
終了アドレスを 300 Ah に登録します。リロ 
ケートの際に書き換えてほしくないデータ 
やワークエリアを含む場合は， 66 A 1 h から 
の [ DATA 領域， DATA ] に最初と最後のア 
ドレスを追加登録してください0 

さらに マシン語ルーチンを 作るときに 注 
意してほしいことがあります。 ランタイム 
ルーチンのリロケータは，ランタイムルー 
チン 内のアドレスを2 バイ トの データと し 
て持つ命令のみ書き換えますから，アドレ 
スを1バイ トずつに分けてしまった場合は， 
書き換えの対象になりません。また未定義 
命令などもサポートしていません。 

こういったことに気をつければ，自由に 
SLANG を抗張できます。 


最後に 


SLANG を駆け足で説明してきましたが， 
いかがでしたか。私自身あまり ALGOL 系 
の言語に慣れていませんので，少々わかり 
にくかったかもしれません（大きな声では 
いえないが，私は一度も C や PASCAL を 
使ったことがない)。 

SLANG は C などを指向して作った言語 
です力す， PRINT 関数など意識して BASIC 
に近づけた部分もあります。それはとっつ 
きにくさを少しでも減らして，なるべく多 
くの方に使ってほしかったからです。そし 
て整数しか使えないなどの欠点はあります 
が，実際に使ってもらえるだけの コンパイ 
ラに仕上げたつもりです。ゲームやユーテ 
ィリティを作るのもよし， C 言語の入門の 
つもりでもかまいません。使われて ナン ボ 
の コンパイラ， どんどん使ってやって〈だ 
さい。個人的には，思考型のゲームなどを 
SLANG で組んでくれるとうれしいな 一。 
誰か， SLANG でオセロを作ってくれませ 
んか？ 


セーブコマンドの修正- 

セーブコマンドにバグがありました。リスト6のようにプログラムを修正してください, 

II スト6 セーブルーチン 


0000 

0000 

0000 

0000 

0000 

0000 

0000 

0000 

0000 


1 

2 

3 

4 

5 

6 

8 

9 

10 


SLANG SAVE.Asm 

IS filename : 先頭： Jft 終[:実行丨：格納1】 
U 内は省駱可 
OFFSET SDOO0-S3148 
ORG $3148 


48 






12 

^HLHEX 

EQU 

S1FB2 



48 






13 

*FILE 

EQU 

S1FA3 



48 






14 

*DTADR 

EQU 

S1F70 



48 






15 

#SIZE 

EQU 

S1F72 



48 






16 

CEXADR 

EQU 

$1F6E 



48 






17 

OFDATA 

EQU 

$31B8 



4 8 






18 

； 





48 

3E 

01 




19 


LD 

A，1 



4A 

CD 

A3 

IF 



20 


CALL 

#FILE 



4D 






21 

; 先頭 





4D 

1A 

FE 

3A 

C0 


22 


し D 

A,(DE) 

IF A<>”：" 

RET 

51 

13 





23 


INC 

DE 



52 

CD 

B2 

IF 

D8 


24 


CALL 

*HLHEX 

IF C RET 


56 

22 

70 

IF 



25 


LD 

(#DTADR),HL 


59 

22 

6E 

IF 



26 


し D 

(*EXADR) 

,HL 


5C 

22 

B8 

31 



27 


LD 

(OFDATA),HL 


5F 






28 

; 最終 





5F 

1A 

FE 

3A 

C0 


29 


LD 

A,(DE) 

IF A く 〉"：” 

RET 

63 

13 





30 


INC 

DE 



64 

CD 

B2 

IF 

D8 


31 


CALL 

fHLHEX 

IF C RET 


68 






32 

； OR A 





68 

ED 

4B 

70 

IF 


33 


LD 

BC,(#DTADR) 


6C 

ED 

42 




34 


SBC 

HL f BC 



6E 

23 





35 


INC 

HL 



6F 

22 

72 

IF 



36 


LD 

(#SIZE),HL 


VI 






37 

; 実行 





72 

1A 

FE 

3A 

20 

15 

38 


LD 

A, (DE) 

IF A<>”：" 

JR LB し 

77 

13 





39 


INC 

DE 



78 

CD 

B2 

IF 

D8 


40 


CALL 

#HLHEX 

IF C RET 


7C 

22 

6E 

IF 



41 


LD 

(#EXADR),HL 


7F 






42 

; 格納 





7F 

1A 

FE 

3A 

20 

08 

43 


LD 

A,(DE) 

IF AO":" 

JR LBL 

84 

13 





44 


INC 

DE 



85 

CD 

B2 

IF 

D8 


45 


CALL 

tHLHEX 

IF C RET 


89 

22 

B8 

31 



46 


LD 

(OFDATA),HL 



47 し BL 

48 ; 

49 ； END 


-H 

m 

〇〇 

m 

z 

•h 

z 

m 
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23 

11 

2D 

B6 

2A 

3B 

AF 

09 

3B 

AF 

EB 

FI 

AF 

35 

C0 

85 

22 

3B 

AF 

54 

20 

43 

5A 

CF 

20 

00 

05 

2D 

04 

14 

0A 

32 

05 



34 


AF0O 

AF08 

AF10 

AF18 

AF20 

AF28 

AF30 

AF38 

AF40 


JR OPEN 
JR MOVE 


JR 

CLOSE 

LD 

DE f DATA 

CALL 

RET 

WNOPEN 

LD 

HL,(ADR) 

LD 

E f (HL) 

INC 

HL 

LD 

D f (HL) 

INC 

HL 

LD 

(ADR) t HL 

EX 

DE f HL 

CALL 

WNMOVE 

LD 

HL,COUNT 

DEC 

(HL) 

RET 

NZ 

LD 

(HL) t 4 

LD 

HL,LDATA 

LD 

RET 

(ADR) f HL 


CLOSE: 


AF29 

CD 

03 

B0 

35 

CALL 

WCLOSE 

AF2C 

C9 



36 

RET 


AF2D 




37 ; 



AF2D 




38 DATA: 



AF2D 

20 

43 

5A 

39 

DEFM 

'CZ-8( 

AF30 

2D 

38 

30 




AF33 

30 

43 

20 




AF36 

00 



40 

DEFB 

0 

AF37 

05 

05 

14 

41 

DEFB 

5,5, 20 

AF3A 

0A 






AF3B 




42 ； 



AF3B 

3E 

AF 


43 ADR： 

DEFW 

LDATA 

AF3D 

04 



44 COUNT： 

DEFB 

4 

AF3E 

14 

0A 


45 LDATA： 

DEFB 

20,10 

AF40 

0A 

08 


46 

DEFB 

10,8 

AF42 

18 

00 


47 

DEFB 

24,0 

AF44 

05 

05 


48 

DEFB 

5,5 


2 ; WINDOW SAMPLE 



4 

WNOPEN 

EQU 

OB000H 

5 

WCLOSE 

EQU 

OBO03H 

6 

WNMOVE 

EQU 

08006 H 

8 

9 


ORG 

0AF00H 


SUM : 2D IF 94 59 AF A2 C2 9F 0918 


000 Oh 

300 Oh 


B000h 
B800h 
井 MEMAX 


モニタ 


SWORD 本体 


アプリケーシ三 

( TPA ) 


パッケ ジ本体 


ワーク 


(«((S-0S 漏》»〉 

M3 Clusters Free 

Asc B ： MIHD0W2 .ASM ： 0888 ： 5571： 6880 

Bin B:N1_ .Oy ： B808 ： B67ft：lFFA 

ftsc «= CZ-888C =lftSH ： €00 ： 5158：8808 
Bin ： IJflF60 :0bj:AF 明 : AF6i:AF 的 

tec : : ftSR ： 4E88 ： 51B6 ： 380e 

Bin : 1= C2-852C ==IF08 

IJAF6 ： : Bin B:_I : 


Bin B：SWLE 
.Obj ： fiF00 ： fiF6i 
:膽 

ftsc B ： SflMPl£2 
•O : 似 0:5106 


よ •柳” 


0000 
0000 
0000 
0000 
0000 
0000 
0000 
AF00 
AF00 
AF00 18 
AF0218 
AF0418 
AF06 
AF0611 
AF09 CD 
AF0C C9 
AF0D 
AFOD 2A 
AF10 5E 
AF1123 
AF12 56 
AF13 23 
AF14 22 
AF17 EB 
AF18 CD 
AF1B 21 
AF1E 35 
AF1F C0 
AF20 
AF20 36 
AF22 21 
AF25 22 
AF28 C9 
AF29 


04 

09 

23 

2D AF 
00 B0 


06 BO 
3D AF 


04 

3E AF 
3B AF 


全機種共通 S - OS “ SWORD ” 要 


マルチウインドウドライバ MW -1 


森喜一郎 


Mori Kiichiro 


S - OS でウインドウを 


このプログラムは s - os で 「マルチ ウイ 
ンドウモドキ」を実現するためのものです。 
マルチ ウインドウというと，すぐ Macinto 
sh の画面や X 68000 のビジユアルシェルの 
ようなものを思い浮かべる方も多いでしょ 
う。しかし，このパッケージではそのよう 
な完全な マルチ ウインドウはできません0 
もともと，このパッケージでは以前 PASO 
PIA 7 用 “ SWORD ” のモニタに使われてい 
た マルチ ウインドウ「っぽい j 環境を提供 
するためのものです。完全な マルチ ウイン 
ドウといわないところが S - OS らし〈てい 
いんじやないでしよう力、 


入力と使用方法 


各機種のモニタまたは MACINTO - C な 
どの マシン 語入カ ツールから リスト1を打ち 
込んでください。チェックサム， CRC チェ 
ックバイトを確認のうえ，ディスクやテー 
プにセーブしておきます。そして実行前に 
図1メモリマップ 



は表3に従って “ SWORD ” 内部を書き換 
えておきます0リスト1は単なるドラ!イバ 
ですので， パラメータを 与えることなく] I ： 
接実行することは避けてください。使い方 
をよく理解しておかないとこれだけではな 
にもできません。 

パッケージの使用方法ですが，まず DE 
レジスタに ウインドウの各種 パラメータを 
セットして B 006 h をコールするとウインド 
ウがオープンされます。ウィンドウ内では 
# BOOT ，# MON，#WIDCH を 除く S -0 
S のすベてのサブルーチンを使用すること 
ができます。ウィンドウはメモリの許す限 
り，いくら開いてもかまいません。 

逆に B 003 h をコールすると新しい ウィン 
ドウから順番に閉じていきます。また ， L 
レジスタに X 座標， H レジスタに Y 座標を 
入れて B 006 h を コールす ることでその座標 
をウィンドウの右上とする位置へ現在使用 
中のウィンドウを移動することができます。 

メモリ不足，不正パラメータなどでウィ 
ンドウが正常にオープンできなかった場合， 
キヤリフラグを立ててリターンします。ウ 
インドウを開いたままリセットした場合な 


S - OS でマルチウインドウ処理を行うため 
のパッケージです。共通ルーチンで記述さ 
れていますので速度などではきつい面もあ 
りますが，このような処理の基本を探ると 
い5意味では参考になります。使い方次第 
では S - OS の世界もまた広がりそうですね。 



どはワークエリアの内容が残っていますの 
で興 f 動作することがあります。開いたウ 
インドウは必ず閉じるようにしたほうがよ 
いでしょう。 

サンプル1はこのハ 0 ッケージの使い方を 
示したものです。 AFOOh をコールするとウ 
イ#?ウがひとつ開かれます。次からは A 
F 02 h をコールするたびにウインドウの表示 
位置が変わっていきます。ウインドウを消 
したいときは AF 04 h をコールして〈ださい0 


ブログラム解説 


リスト2にパッケージ本体の ソース リス 
卜を示します。まず最初（ウィンドウがま 
ったく オープンされ ていない 状態）に BOOOii 
を コールす る こ とで S - OS の表示関係の17 
個の ルーチンに ノ 、。ッチが あてられます（と 
一と 一，ここ までやってしまった）。 こ れで 
S - OS の表示 ルーチン はこの ドライバに 乗 
っとられたかたちとなり，すべてのウィン 
ドウを クローズす るまで，ウインドウの内 
部で表示/入力が行われます。 

ただし，各機種ごとにワークエリアのア 


サンプル1 


892DF93F5 

1C23AC4AO 

9031E00E0 

0B223B330 

8060130 A8 
105B 20301 

4D364D848 

0C200C310 

8FED69D5A 

1A5C3C200 


0123456789012345678901234 

1111111111222222222233333 


144 Oh ! X 1988.7. 



































表 1 ジャンプ テーブルー覧 


リスト1 MW -1 ダンプリスト 


C3 

98 

37 

B1O0 

36 

00 

00 

DD 

23 

10 

F8 

DD 

IB 

00 

00 

B2 

B108 

2A 

8 0 

B0 

06 

04 

1A 

13 

DD 

6E 

F5 

1F 

25 

B110 

77 

10 

DD 

23 

10 

F7 

DD 

2A 

95 

E9 

1F 

32 

B118 

80 

B0 

CD 

B2 

B4 

DA 

0F 

B2 

FE 

D4 

1F 

F9 

B120 

DD 

70 

14 

DD 

71 

15 

DD 

46 

E7 

1C 

20 

34 

B128 

14 

04 

04 

DD 

4E 

15 

0C 

0C 

74 

37 

20 

95 

B130 

2A 

82 

B0 

DD 

75 

IB 

DD 

74 

1A 

00 

00 

00 

B138 

1C 

CD 

E4 

B4 

DA 

0F 

B2 

ED 

09 

C3 

9E 

09 

B140 

53 

82 

B0 

EB 

DD 

6E 

10 

DD 

A8 

B3 

C3 

D9 

B148 

66 

11 

CD 

F5 

B4 

21 

D7 

B0 

95 

EA 

B3 

34 

B150 

DD 

7E 

10 

77 

23 

DD 

7E 

11 

71 

C3 

5E 

55 

B158 

77 

23 

DD 

7E 

14 

77 

23 

DD 

80 

B4 

G3 

49 

B160 

7E 

15 

77 

23 

7E 

36 

00 

DD 

BE 

B1 

B4 

93 

B168 

77 

16 

23 

7E 

21 

00 

00 

DD 

2C 

00 

00 

28 

B170 

77 

17 

23 

7E 

36 

0 0 

DD 

77 

B9 

00 

00 

00 

B178 

18 

CD 

61 

B0 

DD 

7 5 

19 

DD 

3E 


B180 

B188 

B190 

B198 

B1A0 

B1A8 

B1B0 

B1B8 

B1C0 

B1C8 

B1D0 

B1D8 

B1E0 

B1E8 

B1F0 

B1F8 


SUM ： IF 46 8E A7 73 DD ED D2 


BOOO C3 DE 
BOOS B2 00 
B010 00 00 
B018 F2IF 
B020 E6IF 
B028 C2IF 
BO30 IF 20 
B038 00 GO 
BO40 C3 26 
B048 B3 C3 
B050 CE B3 
BO 5 8 C3 FC 
B060 B4 C3 
B068 8F B4 
B070 C3 B1 
B078 00 00 


F4 

CB 

5D 

44 

CE 

IF 

D6 

A6 

19 

07 

CE 

09 

4A 

74 

E0 

29 


SUM ： 3B IB 2F BB 58 6B 50IE 

B080 00 B8 00 00 00 00 00 00 
B088 00 00 00 00 00 00 00 00 
B090 00 00 00 00 00 00 00 00 
B098 00 00 00 00 00 00 00 00 
B0A0 00 00 00 00 00 00 00 00 
B0A8 0U 00 00 00 00 00 00 00 
BOBO 00 00 00 00 00 00 00 00 
B0B8 00 00 00 00 00 00 00 00 
BOC0 00 00 00 00 00 00 00 00 
B0C8 00 00 00 00 00 CO 00 00 
B0D0 00 00 00 00 00 00 00 00 
B0D8 00 00 00 00 00 00 C5 D5 
B0E0 E5 DD E5 CD 33 B6 DD 2A 
B0E8 80 B0 06 OF 1A 13 B7 28 
BOF0 0E DD 77 00 DD 2310 F4 
B0F81A 13 B7 20 FB 18 08 DD 


SUM ： C4 68 F5 33 FF BD 16 618CD2 


SUM ： 8D 3519 FC 25 04 71 F8 9821 


B200 7F B0 21 00 00 CD 8F B4 : 60 
B208 B7 DD El El D1 Cl C9 CD : 7E 
B210 33 B6 AF 3718 F3 3A 7F : 93 
B218 BO FE 01 D8 C5 D5 E5 DD : E3 
B220 E5 DD 2A 80 B0 01 E3 FF : FF 
B228 DD 09 DD 4614 04 04 DD : 02 
B230 4E 15 OC 0C DD 5E IB DD : AE 
B238 561C DD 6E 10 DD 6611 : 21 
B240 CD 10 B5 DD 6E IB DD 66 : 3B 
B248 1C 22 82 B0 DD 6E 19 DD : B1 
B250 661A CD 67 B0 21 DB B0 : 10 
B258 DD 7E 16 77 23 DD 7E 17 : 7D 
B260 77 23 DD 7E 18 77 DD 22 : 83 
B268 80 B0 3A 7F B0 3D 32 7F : 87 
B270 B0 28IB 01 E3 FF DD 09 : BC 
B278 21 D7 B0 DD 7E 10 77 23 : AD 


SUM ： 73 F4 9E 76 A6 E0 917E 2596 

B280 DD 7E 1177 23 DD 7E 14 : 75 
B288 77 23 DD 7E 15 77 CD 33 : 81 
B290 B6 DD El El D1 Cl B7 C9 •• 6*i 
B298 3A 7F B0 FE 01 D8 C5 D5 : DA 
B2A0 E5 DD E5 DD 2A 80 B0 01 : DF 
B2A8 E3 FF DD 09 DD 5E 12 DD : F2 
B2B0 5613 ED 53 84 BO 7D DD : 37 
B2B8 7710 DD 8614 3C DD 77 : 8E 
B2C0 12 7C DD 7711 DD 8615 : 6B 
B2C8 3C DD 7713 CD B2 B4 38 : 0E 
B2D0 3E 04 04 0C 0C 2A 82 B0 : BA 
B2D8 CD E4 B4 38 32 EB 2A D7 : BB 
B2E0 B0 CD F5 B4 DD 5E IB DD : 59 
B2E8 561C CD 10 B5 DD 6E 10 : 5F 
B2F0 DD 6611 CD F5 B4 ED 5B : 12 
B2F8 82 B0 CD 10 B5 EB CD 67 : E3 


SUM ： 97 3C B7 02 0135 0C 9A C946 


アドレス 

(ラベル） 

破壊 

使用方法 

BOOOh 

( WN 0 PEN ) 

AF 

DE レジスタにパラメータの先頭 
アドレスをセットして コールす 
るとウィンドウが開く。 

B 003 h 

( WCL 0 SE ) 

アクティブウィンドウを閉じる。 

B 006 h 

( WNM 0 VE ) 

L レジスタに X 座標， H レジス 
夕に Y 座標をセットして コール 
すると，その位置にアクティブ 
ウィンドウが移動する。 


ドレスが異なる# FPRN T だけは例外です0 
このルーチンは一律にパッチをあてること 
はできませんので “ SWORD ” 内部を表3 
のように書き換えてください。 

このパッケージは本当の意味でのマルチ 
ウィンドウではありません。ウィンドウプ 
ログラムに必須ともいうべき「仮想画面」 

を採用していないのです。これは画面退避 
用に S - OS の特殊ワークエリアを使用して 
いるため，仮想画面を採用すると特殊ワー 
クのもっとも小さい MZ -80 K などの機種で 
は少々難があると思ったためです。したが 
って，操作できるのはいちばん最近開いた 
ウィンドウた'、け，アクティブウィンドウを 
切り換えるといった高等な技は使えません。 

ウィンドウ内では “ SWORD ” のコマン 
ドはもちろん，少々手直しを加えれば（ウ 
ィンドウ内に収まるように），いくつかのア 
プリケーションも走らせることができます。 
ただ，この場合には特殊ワークを使用する 
アプリケーション （ ZEDA など）では ， B 
082 h からの2バイトがこのパッケージが使 
用する特殊ワークの先頭アドレスとなって 
いますので重複しないように書き換えてく 
ださい。 RAM ディスクなどを使用する場 
合も同様です。 

なお，ウィンドウの枠のデザインが気に 
いらない方は以下のキャラクタデータの格 
納アドレスを参考に書き換えるとよいでし 
ょラ〇 

左右上隅 B198h 


表2ウインドウオープン時のパラメータ 


上枠 

B197h 

左右枠 

BIAOh 

左右下隅 

BIACh 

下枠 

BIABh 


最後に 


このパッケージではポンポン画面を切り 
換えていくマルチウインドウの醍醐味は味 
わえませんが， MZ - 2500のアルゴ機能のよ 
うにアプリケーシヨンの実行中にちょつと 
ほかの処理がしたいといったときには威力 
を発 f 単します。 


表3 “ SWORD ” の変更点 

それぞれのアドレスからの2バイトを F 
4 n , IFh に変更してください。 


• X l/turbo 

IAC 3 h , IACBh , IAD 8 h 

• MZ -80 B / 2000 /2200/2500 
I 849 h , m \ H , I 85 Eh 

• M Z -80 K / C /1200/700/1500 
I 95 Fh , I 967 h , 197411 

• PC -8801 ( ROM ) 

I 99 Eh , I 9 A 6 h , I 9 B 3 h 

• SMC -777 

064 Ch , 0654 h , 066111 

• MZ - 2500 

ID 8 Dn f ID 95 n f IDA 2 h 

• PC -8001/8801 
17661 1, I 76 Eh , I 77 Bii 

• X I turbo 

0685 h , 068 Dh , 069 Ah 

• PAS 0 PIA 7 

IB 09 h , IBIIm . IBIEm 


s-os 用サイドキックソフトなんてのが 
揃うとなかなか楽し〈なりそうでしよう。 
機種によっては表示が重くなるのはしかた 
ありませんが，できるだけ スクロール など 
をさせないような画面設計を心がけるなど 
すれば，それほどの問題はないと思われま 
す 0 s-os にもアルゴキーの代わりがほし 
いところですね。 

Profile 

◊森さんは大阪府にお住まいの22歳，大学4年生 
です。漢字出カパッケージ士もお馴染みですね。 
大阪工大 S -0 S ユーザーズ グループの一員ても 
あります。 


DEFM 

’ウインドウ名’ 

DEFB 

0 

DEFB 

左端 X 座標 （0 SXIS 79) 

DEFB 

上端 Y 座標 （0 SYIS 24) 

DEFB 

右端 X 座標 （ XISX 2 S 79) 

DEFB 

下端 Y 座標 （ YISY 2 S 24) 


201FF0FO3134D3OO 

B0111210BCCB7COO 

6O0CO9F0633B34-0O 

100EE1809CB4CBO0 

3OOFFF0033D 34100 
CO 011120 CBDCBBOO 

0OOF3F1 03 6 337340 
B00EEB30BBCB6CBO 


E 610963 D510B0DD2 
4622BB2D01BC9CD3 

DD011CE1760D009C 
DDB2007D 4643 1B03 

406DED586DD467D0 
01803 CDF1DC986DB 

4E16DB0O0C36DD0F 
161B 020232 1CDC07 

6D0C6D678CA681DA 
4DB0B20BB 2113113 

DC7DC104D008B6-10 

DO6C02B031BIC60B 

ACDAD7034E795D00 
10C2CF 81166 F0DB8 

451DA0A2EDD0FFF2 
711332217 Del 3642 


THE SENTINEL 
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B380 OF 
B388 BO 
B390 CD 
B398 20 
B3A0 CD 
B3A8 20 
B3B0 CD 
B3B8 67 
B3C0 C9 
B3C811 
B3D0 1A 
B3D818 
B3E0 B7 
B3E8 E3 
B3F0 95 
B3F8 FB 


B300 

B308 

B310 

B318 

B320 

B328 

B330 

B338 

B340 

B348 

B350 

B358 

B360 

B368 

B370 

B378 


B580 B4 
B588 96 
B590 CD 
B598 24 
B5A0 CB 
B5A8 4C 
B5B0 D5 
B5B8 B0 
B5C0 B0 
B5C8 E5 
B5D0 2C 
B5D8 D1 
B5E0 0D 
B5E8 DB 
B5F0 CB 
B5F8 3A 


IF 20 0E 24 3A DA 
20 04 25 CD AF B5 
B4 El FI C9 F5 3E 
26 B3 FI C9 F5 E5 
B4 24 3A DA B0 BC 
CD AF B5 25 2E 00 
B4 El FI C9 E5 CD 
2C 2D C4 9E B3 El 
D51A 13 FE 0D 28 
26 B318 F5 F5 D5 
B7 28 05 CD 26 B3 
D1 FI C9 E3 7E 23 
05 CD 26 B318 F6 
C5 E5 CD 67 B4 78 
3E 20 CD 26 B310 
Cl C9 D5 E5 CD 21 


53 

D7 

B0 

CD 

8F 

B4 

8B 

El 

El 

D1 

Cl 

C9 

2A 

DB 

DD 

75 

10 

DD 

74 

11 

4B 

84 

B0 

DD 

73 

12 

DD 

BB 

AF 

37 

18 

E3 

F5 

E5 

40 

38 

14 

CD 

40 

B0 

CD 

F4 

3A 

D9 

B0 

BD 

20 

5B 

16 

B5 

CD 

9E 

B3 

18 

53 

90 

20 

05 

CD 

9E 

B3 

18 

66 

0C 

20 

05 

CD 

47 

B5 

42 

CD 

67 

B4 

FE 

1C 

20 

7B 

3A 

D9 

B0 

BD 

CC 

9E 

20 

2D 

FE 

ID 

20 

OD 

2D 

6D 

FF 

20 

23 

3A 

D9 

BO 

80 

18 

04 

FE 

IE 

20 

09 

0D 

FE 

FF 

20 

12 

24 

18 

0C 


SUM: 7A D5 A4 2E 68 C9 3F 05 


SUM ： CF BA EO 54 35 21 C7 B5 


B430 20 
B43813 
B440 C9 
B448 IB 
B450 CD 
B458 BB 
B460 4B 
B468 CD 
B470 2F 
B478 2F 


92 

H6 

DE 

5A 

8C 

A8 

5D 

6A 

F3 

8E 

B7 

ID 

98 

B6 

F0 

0E 


リスト日 Mw-r ノース リスト 


S-OS Multi-window system 
(VI.1) 19,8/04/09 by K.MORI 


6 #PRNT 

7 IPRNTS 

8 fLTNL 

9 tNL 
10 攀 MSG 

11 #MSX 

12 tMPRNT 

13 #TAB 
H IGETL 

15 tBRKEY 

16 fBELL 

17 tPRTHX 

18 tPRTHL 

19 #ASC 

20 #POKE 

21 #PEEK 
22 參 MON 

23 tCSR 

24 #SCRN 

25 tLOC 

26 fFLGET 

27 

28 #B( 

29 ; 

30 #WKSIZ 

31 tXYADR 

32 #WIDTH 

33 tMXLIN 

34 ; 

35 


EQU 
EQU 
EQU 
EQU 
EQU 
HQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
fIDCH EQU 
100 T EQU 

EQU 
EQU 
EQU 
EQU 


1FF4H 
1FF1H 
1FEEH 
1FEBH 
IFE8H 
1FE5H 
IFE2H 
1FDFH 
1FD3H 
1FCDH 
1FC4H 
1FCIH 
iFBEH 
1FBBH 
1F9AH 
1F94H 
1F8EH 
20I8H 
201BH 
201EH 
2021H 
2030 H 
2036H 

1F68H 

IF78H 

1FSCH 

1F5BH 


55 

56 


ORG OB0O0H 
ENTRY ADDRESS 

y ： 

JP WNOPEN 
JP WCLOSE 
JP WNMOVE 


S-OS ADR.TABLE 


DEFB 17 
DEFW tPRNT+1 
DEFW #PRNTS4l 
DEFW ILTNL+l 
DEFW fNL^l 
DEFW iHSG^l 
DEFW 難 MSX+1 
DEFW IMPRNT+l 
DEFW 攤 TAB+1 
DEFW #GETL+1 
DEFW iPRTHX^l 
DEFW tPRTHLf1 
DEFW tCSR+1 
DEFW #SCRN+1 
DBFW #L0C+1 
DEFW #WIDCH+1 
DEFW #M0N+1 
DEFW 雜 BOOT+1 
DEP8 8 


B03B 

B03E 

B040 

B04O 

B04O 

B040 

B040 

B043 

8046 

B049 

B04C 

B04F 

B052 

0055 

B058 

B05B 

BOSE 

B061 

8064 

8067 

B06A 

B06D 

BO70 

B073 

B076 

B079 

B07C 

B07F 

B07F 

B07F 

B07F 

B080 

BQ82 

B084 

B086 

B089 

B08C 

B08F 

B092 

B095 

B098 

B09B 

B09E 

BOAl 

B0A4 

B0A7 

B0AA 

BOAD 

B0BO 

B0B3 

B0B6 

B0B9 

BOBC 

B0BF 

B0C2 

B0C5 

B0C8 

B0CB 

B0CE 

B0D1 

B0D4 

B0D7 

B0D7 

B0D9 

B0DA 

BODB 

B0DE 

BODE 

BODE 


00 00 00 
00 00 


C3 26 B3 
C3 96 B3 
C3 9E B3 
C3 B6 B3 
C3 Cl B3 
C3 CE B3 
C3 DD B3 
C3 EA B3 
C3 PC B3 
C3 4B D4 
C3 5e B4 
C3 67 B4 
C3 7D B4 
C3 8P B4 
C3 B! B4 
C3 D1 B4 
C3 B1 B4 
00 00 00 
00 00 00 
00 00 00 
00 00 00 


00 

00 B8 
00 00 
00 00 
00 00 00 
00 00 00 
00 00 00 
00 00 oe 
eo oo ee 
00 00 oo 
00 00 00 
00 00 00 
00 00 00 
CO 00 00 
00 00 00 
00 00 00 
00 00 00 
oo oe oo 
oe eo 00 
00 00 00 
00 00 
00 00 00 
00 00 00 
00 00 00 
00 00 00 
00 00 00 
eo oo eo 
eo oe oo 
ee oo 00 
00 00 00 
eo oo eo 

eo oo 


68 : PATCH JUMP TABLE 

69 ； 

70 fPATCH ： 

71 XPRNT ： JP 0PRNT 

72 XPRNTS : JP tPRNTS 

73 %LTNL ： JP «LTNL 

74 %NL ： JP 

75 %HSG ： JP #MSG 

76 %MSX ： JP «MSX 

77 XMPRNT ： JP TMPRNT 


78 XTAB: 

79 %GETL ： 

80 XPRTHX : 

81 %PRTHL ： 

82 XCSH ： 

83 %SCRN : 

84 XLOC ： 

85 XWIDCH ： 

86 XMON ： 

87 XBOOT : 

88 


©TAB 

«GETL 

*PRTHX 

«PHTHL 

0CSR 

9SCRN 

•LOG 

0WIDCH 

後 MON 

MOOT 


90 ； WORK AREA 

91 : 

92 WINFLG ： DEFB 0 

93 PARPTR : DEFW WIB 

94 WKADR: DEFW 0 

95 WORDBF: DEFS 2 

96 STRBUF ： DEFS 81 


number of windows 
top of parameter a 
top of work area 
etc. work 
line work 


97 ； 

98 «WINXY ： DEFS 2 

99 ©WIDTH ： DEFS 1 
100 «MXLIN: DEFS 1 
101 ⑭ LCFLG: DEFS 3 
102 ； 

103 ; 拿拿 t 拿 t 拿拿 

104 ；t OPEN THE WINDOW 


(Xl.Yl) of window 
width of window 
max line no. 
line connect flag 


SUM ： 56 53 D2 68 E7 A7 92 DD 37E5 

B600 3A D9 B0 47 CD 43 B0 10 : DA 
B608 FB El Cl C9 C5 D5 E5 CD : B2 
B610 61 B0 22 84 B0 El7C 12 : D6 
B61813 05 7D 121310 FB 7C : 41 
B620 1213 AF 12 D1 CD 4F B0 : 83 
B628 Cl E5 2A 84 B0 24 CD 67 : 5C 
B630 B0 El C9 3A 7F B0 B7 C0 : 3A 
B638 D5 DD 2115 B0 DD 46 00 : BB 
B640 DD 23 2140 B0 23 DD 5E : 6F 
B648 00 DD 56 011A 4E EB 71 : F8 
B650 1213 231A 4E EB 7112 : IE 
B658 23 DD 23 DD 2310 E6 D1 : EA 
B660 C9 E5 21 00 00 7B 5A 16 : BA 
B668 00 B7 28 0B CB 3F 30 01 : 25 
B670 19 CB 23 CB 1218 F2 5D : 4B 
B678 54 El C9 : FE 


SUM ： 49 5D C5 99ID C5 C0 68 B56D 


B560 11 
B568 BO 
B570 8F 
B578 77 


86 B0 CD 
2410 F4 
B4 AF 21 
23 77 21 


8F B4 CD 
2100 00 
DB B0 77 
00 00 CD 


4F 

73 

CD 

C6 

23 

38 

8F 

8E 


SUM ： IE FA A8 C3 FI10 BD CC 0867 

B480 BO 3C 85 6F 3A D8 B0 3C : DE 
B488 84 67 CD 64 B0 El C9 F5 : 6B 
B490 E5 3A D9 B0 3D BD 3816 : F0 
B498 3A D7 B0 3C 85 6F 3A DA : 05 
B4A0 B0 3D BC 38 09 3A D8 B0 : AC 
B4A8 3C 84 67 CD 67 BO El FI : DD 
B4B0 C9 C9 E5 DD 7E 12 215C : 61 
B4B8 IF BE 30 25 DD 9610 38 : ED 
B4C0 20 28IE 3D 47 FE 03 38 : 23 
B4C818 DD 7E 13 215B IF BE : DF 
B4D0 30 0F DD 961138 0A 28 : 2D 
B4D8 08 3D 4F FE 02 38 02 El : AF 
B4E0 C9 37 El C9 E5 59 50 CD : 05 
B4E8 61 B619 ED 5B 68IF EB : EA 
B4F0 B7 ED 52 El C9 C5 D5 E5 : IF 
B4F8 E5 C5 CD 64 B0 EB CD 9A : DD 


SUM ： 5D EC F4 A5 AB B114 8C 3ACD 

B500 IF EB 13 2C 10 F4 Cl El : EF 
B508 24 0D 20 EC El D1 Cl C9 : 79 
B510 C5 D5 E5 CD 61 B0 22 84 : 03 
B518 B0 El E5 E5 CD 67 B0 21 : 60 
B520 86 B0 C5 EB CD 94IF EB : 51 
B52813 77 2310 F6 36 00 21:0A 
B530 86 B0 EB CD 4F B0 EB Cl : 99 
B538 El24 0D 20 DE 2A 84 B0 : 6E 
B540 CD 67 B0 El D1 Cl C9 C5 : E5 
B548 D5 E51186 B0 3A D9 B0 : C4 
B550 47 3E 20 121310 FA AF : 83 
B55812 21 00 00 3A DA B0 47 : 3E 


SUM ： 03 A8 C61A 47 B13B 8E 2CB8 

B400 20 F5 CD CD IF 28 3A FI : 21 
B408 FE 0D 28 05 CD 26 B318 : F6 
B410 ED CD 67 B4 AF BC 28 07 : 6F 
B418 25 CD 8F B5 20 F6 24 2E : 9E 
B420 00 CD 7D B41213 2C 3A : 89 
B428 D9 B0 BD 20 F4 CD 8F B5 : 6B 


146 Qh . y 1988 7 ►ハードの進歩に伴ってだんだんパソコンのつくりが複雑になってきている。 MZ -80 が自 

分の手足のようになっていたのに，いまでは私が XI turbo の手足である。これから数年の 
ち，パソコンのハードは市販のマシン語ゲームのようになってしまうのだろうか。 

矢落亮一 （16) 香川県 


D 551057 A 50101350 
CEEE0CDDDBEB22EB 

595C69AA442F 5657 
ECCF0C 332614 B1C6 

5190 C1704DFD6B9D 
FFC23C6B2CACFCCC 

9115B906E780D31F 
CEE2C0B 814 FBC2C6 

17 6 FC 081800746 1C 
C7A03BD12B1622D3 

1651 BBAFF93D2B10 
DBB0CD3 6 4D1CECEB 

156EC15CDA 250067 
EB9332E 333122 BID 


ECFD74F45D 368971 
FB 80608 BFC1F2C4E 


DD0B3O4-5DE1C8EFC 

KDB512B80F421F67 

4 7 7D2E7DEA8A3DD5 
BBUE7FBC F.4 1 O B 7 3 2 


5 7824b>0m)6f)0b6c 370 
0 9F1915FB9DFACAC5 
7 


1487B260C2 
8AC 0090768 


A1E7DD 5547 
FD30CCF99D 

8117 1C9CCA 
2ED0F7C333 

0317394005 

2BE0BCBBBE 

EE1763B789 

F9P02B4DDC 

AD35D6DAA1 

1CBFC2C33F 

B2E9FDD0F7 

119C1C7B66 

CFD2BF41CC 

EAC1B1B633 


02200 ^^ 
B B B 0 ® o 0 

DE 16 98HS 


fffffffffff 


0 

0 o 0 o F o 0 
2 2 2 2 12 0 


sss oe s oeoe ll F5F2 EFEC B9 E6E3EeD4 c2BF19 lc lF 31 8F 3 7 00 




























A ，（ DE) 

DE 

A 

NZ f SETL2 

SETXY 

(IX+O),0 


LD A,(WINFLG) 
INC A 

LD (WINFLG),A 


SET WINDOW POSITION 


LD IX,(PARPTR) 

LD 8,4 

LD A,(DE) 

INC DE 

LD (IX-M6) f A 
INC IX 
DJNZ SETL4 

LD IX,(PARPTR) 


SET WIDTH,MAXLIN 

CALL WIDLIN 
JP C,OPERR 
LD <IX+20>,B 
LD 《IX + 21KC 

SCREEN : 二 > WORK 


INC 

INC 


HL,(WKADR) 
(IX+27),L 
<IX+28>,H 
.WKCHK 
C.OPERR 

(WKADR) 9 DE 


LD L,(IX+16) 
LD H f (IX+17) 
CALL STSCRK 

GET PARAMETER 

LD HL f «WINXY 
LD A,(1X416) 
LD (HL),A 
INC HL 

LD A,(1X417) 
LD (HL),A 
INC HL 

A t (1X420) 
(HL) t A 
INC HL 

A,(IX+21) 
(HL),A 
INC HL 


LD 

LD 

INC 

LD 

LD 


LD 


200 

201 

202 

203 

204 

205 

206 

207 

208 
209 



GALL \CSR 

<IX+25>,L 
(IX+26),H 

DISP. THE WINDOW 


LD 

LD 


8 ； 


22e 

221 

222 

223 

224 

225 

226 

227 DSL1 ： 

228 

229 

230 

231 

232 

233 

234 

235 ; 

236 

237 


LD L,(1X^16) 
LD H,(IX+17) 
CALL XLOC 
LD DE,STRBUF 

LD HL, 1 拿 ：：* 
CALL LINPRT 


JR NZ.DSL1 
LD HL, 

CALL LINPRT 


HL,(PARPTR) 
B.0 


CALL PATCH 
XOR A 
SCF 

JR OPE 

拿韋拿拿拿拿倉拿拿拿拿拿拿拿拿拿拿拿尊拿拿拿拿拿 tt 

• WINDOW CLOSE 拿 

拿 t 拿 t 拿拿拿 # 拿拿拿拿尊拿 tt 拿 ttttt 拿$拿拿 


LD A,(KINFLG) 
CP 1 
RET C 

PUSH BC 
PUSH DE 
PUSH HL 
PUSH IX 

LD IX,(PARPTR) 


LD A•< DE ， 

INC DE 
CALL %PRNT 
DJNZ DSL4 
JR DSL6 

ADD A,4 
DEC A 
SRL A 
DEC B 
SRL B 

ADD A,(lX<f 16) 
SUB B 
LD L，A 
LD H,(1X4*17) 
CALL %LOC 
CALL XMSX 

LD BC.29 
ADD IX,BC 
LD 《 PARPTR し IX 


PUSH BC 
PUSH DE 
PUSH HL 
PUSH IX 
CALL PATCH 

SET WINDOW NAME 

LD IX,(PARPTR) 


283 

284 

285 

286 

287 

288 

289 

290 

291 

292 

293 

294 

295 

296 

297 

298 

299 

300 

301 

302 

303 

304 

305 

306 

307 

308 
3 09 

310 

311 

312 

313 

314 

315 

316 


238 

239 DSL2 ： 

240 

241 

242 

243 

244 

245 

246 

247 ; 

248 

249 

250 

251 

252 

253 ; 

254 

255 

256 

257 

258 

259 

260 

261 DSL4: 

262 

263 

264 

265 

266 

267 DSL5: 

268 

269 

270 

271 

272 

273 

274 

275 

276 

277 

278 

279 DSL6 ： 

280 
281 
282 


318 

319 

320 

321 

322 

323 

324 

325 

326 

327 

328 

329 

330 

331 

332 

333 

334 

335 

336 

337 

338 

339 

340 

341 

342 

343 

344 

345 

346 

347 
3-18 
349 


350 

351 

352 

353 

354 

355 

356 

357 

358 

359 

360 

361 

362 

363 

364 

365 

366 

367 

368 

369 

370 

371 

372 CLE ： 


LD BC,-29 
ADD IX.BC 

ORK ==> SCREEN 

LD B,(IX+20) 
INC B 
INC B 

LD C f (IX+21) 
INC C 
INC C 

LD E,(1X427) 
LD D,(1X^28) 
LD L,(IX+16) 
LD H,<IX+17> 
CALL LDSCRN 


LD 


LD 

INC 


L, (IX4-27) 
H.UX + 28) 
(WKADR),HL 
L v (1X^25) 

H, (1X^26) 
%LOC 

HL, 鬌 LCFLG 
A,(IX+22) 
(HL) f A 
HL 

A v ( IX+23) 

(HL),A 

HL 

A,(IX^24) 
(HL),A 
(PARPTR),IX 


(WINFLG), 

Z.CLE 


GET PARAMETER 

LD BC f -29 
ADD IX,BC 
LD HL 9 0WINXY 
LD A,(IX+16) 
LD (HL) V A 
INC HL 

LD A, ( 1X4-17) 
LD (HL) t A 
INC HL 

LD A f (1X420) 
LD (HL) t A 
INC HL 
LD A,(IX+21) 
LD (HL),A 


マルチウイ: 


1X + 20 
1X+21 


WIDTH 

MXLIN 


HL <== work ptr. 
IX+27 = WKPTR 


next work ptr. 


store work ptr, 

DE <== work ptr. 
L <== X 
H <r= Y 


1X^16 s WINXY 
HL = ©WINXY 


=MXLIN 
翁 MXLIN 


HL = «LCFLG 
IX+22 s LCBUF 


IX+25 = XYBUF 


IX+20 = WIDTH 
IX+21 = MXLIN 


IX+16 s WINXY 
CURSOR L,H 


BF DD 7E 14 


C8 DD 6E 1U 


i DD 6611 
» CD 67 BO 


D5 CD 40 BO 


: CB 38 
DD 86 


)DD 6611 
: CD 67 BO 
- CD 4F BO 

: 01ID 06 
；DD 09 
DO 22 80 


FE 
FF 
B202 
B202 
B205 I 
B2081 
B209 
B209 I 
B20B 1 
B20C I 
B20D ( 
• B20E ( 
B20F 
B20F ( 
B2 
B2 


3A 7F BO 
3C 

32 7F BO 


3A 7F BO 
FE 01 
D8 


(PARPTR) s WNAHE 


B2 

B2 

B221 

B221 

8224 

B225 

B228 

B22A 

B22A 

B22A 

B22A 

B22D 

B22E 

B22F 

B232 

B233 

B234 

B237 

B23A 

B23D 

B240 

B243 

B243 

B246 

8249 

B24C 

B24F 

B252 

B255 

B258 

B25B 

B25C 

B25D 

B260 

B261 

B262 

B265 

B266 

B269 

B26A 

B26A 

B26D 

B26E 

B271 

B273 

B273 

B273 

B273 

B276 

8278 

B27B 

B27E 

B27F 

B280 

B283 

B284 

B285 

B288 

8289 

B28A 

B28D 

B28E 


01 E3 FF 
DD 09 


0C 

0C 

DD 5H IB 
DD 561C 
DD 6E 10 
DD 6611 
CD 10 B5 

DD 6E IB 
DD 661C 

22 82 BO 
DD 6E 19 
DD 661A 
CD 67 BO 
21 DB BO 
DD 7E 16 
77 

23 


01 E3 FF 
DD 09 
21 D7 BO 
DD 7H 10 
77 
23 

DD 7E 11 


► 『歴史街道 j という雑誌の 6 月号の表紙には MZ -731 としか思えない（多少おかしなと 
ころはありますが）マシンの絵が出ています。やはり MZ -700 は歴史の一部だったんです 
ね。 綾塚祐二 （18) 東京都 
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»o 
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00^^0^0^000000000000000000000^3^ 

bbbbqbbbbbbbbbbbdbbbbbbbbbbbbr 


THE SSTINEL 


7 

4 


X I 
I w 




DTH:LIN= 


1 7 6 

2 2 1 
♦ ♦ ♦ 
X XX 


w 


ド 





















B28E CD 33 B6 

B291 DD El 

B293 El 

B294 D1 

B295 Cl 

B296 B7 

B297 C9 

B29B 

B 2118 

8298 

B298 

B298 

0298 

B298 3A 7F BO 
B29B FE 01 
BZ9D D8 
D29E 
B29H C5 
R29F 1)5 
B2A0 E5 
B2A1 UD E5 
B2A3 

B2A3 DD 2A 80 
B2A6 BO 
BM7 01 E3 FF 
B2AA DD 09 
BW DD 5E 12 
B2AF DD 5613 
B2B2 ED 53 84 
B2B5 BO 
B2B6 
B2B6 7D 
B2B7 DD 7710 
B2BA DD 8614 
B2BD 3C 
B2BH DD 77 12 
B2C17C 
B2C2 DD 7711 
B2C5 DD 8615 
B2C8 3C 
B2C9 DD 77 13 
B2CC 

B2CC CD B2 B4 
B2CF 38 3H 
B2D1 OA 
B2D2 04 
B2D3 OC 
B2D4 0C 
B2D5 2A 82 BO 
B2D8 CD E4 B4 
B2DB 38 32 
B2DD 
D20D EB 
B2DE 2A D7 BO 
B2EI CD F5 B4 
B2E1 

B2E4 DD 5E IB 
B2E7 DD 561C 
B2EA CO10 B5 
B2ED 

B2ED DD 6E 10 
R2F0 DD 6611 
B2F3 CD F5 B4 
B2F6 

’ B2FB ED 5B 82 
B2F9 BO 
B2FA CD 10 B5 
B2FD EB 
B2FE CD 67 B4 
B301 BD 53 D7 
B304 B0 
B305 CD 8F B4 
B308 B7 
B309 

8309 DD El 
B30B El 
B30C D1 
B30D Cl 
B30E C9 
B30F 

B30F 2A D7 BO 

B312 DD 7510 

8315 DD 7411 

B318 ED 5B 84 

B31B B0 

B31C DD 7312 

B31F DD 7213 

B322 AF 

B323 37 

8324 18 E3 

8326 

B326 

8326 

B326 

B326 

B326 

8326 F5 ' 
B327 E5 
B328 FE 20 
B32A 3814 
B32C 

B32C CD 40 BO 
B32F CD 67 B4 
B332 3A D9 DO 
8335 BD 
B336 20 5B 
B338 CD 85 B5 
B33B CD 会 E B3 
B33E 18 53 
B340 

B340 FE 01) 
B342 20 OS 
Q344 CD 9E B3 
B3A7 18 4A 
B349 

B349 FE 0C 
B34B 20 05 
B34D CD 47 B5 
B35018 41 
B352 

B352 CD 67 B4 
8355 FE 1C 
B3S7 20 OA 
B359 2C 
B3SA 3A 09 B0 
B35D BD 
B35E CC 9E B3 
B36118 2D 
B363 

B363 PH ID 
B365 20 0D 
B367 2D 
B368 7D 
B369 FE FF 
B36B 20 23 
B36D 3A D9 B0 
B370 3D 
B3716F 


373 CALL PATCH 

374 POP IX 

375 POP HL 

376 POP DH 

377 POP BC 

378 OR A 

379 RET 

380 ； 

381: 拿 ft 家拿寡 • 窠尊 •• 拿 ft 黎尊拿拿塞 #••$$ 拿 t 拿聿， 
38• ピ : t MOVE WINDOW ( HL = YX J 拿 

383 ; 拿拿 it • 拿拿拿零 ♦• 象 • 拿 • 拿 • 拿*••露拿尊零 

384 ； 

385 WNMOVE : 


386 

387 

LD 

CP 

A,<WINFLG) 

1 


388 

KET 

C 


389 ; 




390 

PUSH 

BC 


391 

PUSH 

DE 


392 

PUSH 

HL 

IX 


393 

PUSH 


394 ； 




395 

LD 

IX,(PARHTR) 


396 

LD 

BC.-29 


397 

ADD 

IX,BC 


398 

LD 

E.UX+18) 


399 

LD 

D,(IX+19) 


400 

LD 

《WORDBF し DE 


401； 




402 

LD 

LD 

A,L 


403 

UX+16) h \ 

A t (IX+20) 

5 IX+16 = WINXY 

404 

ADD 

；IX+20 = WIDTH 

405 

INC 

A 


406 

LD 

(IX+18),A 


407 

LD 

A,H 


408 

LD 

(IX+17),A 


409 

ADD 

A, (1X421) 

；IX+21 2 MXLIN 

110 

INC 

A 


All 

LD 

(IX+19) f A 


412 ; 




413 

CALL 

WIDLIN 

；BC <r= W10»LIN 

414 

JR 

C,MVERR 


415 

INC 

B 


416 

INC 

B 


417 

INC 

C 


418 

INC 

C 


419 

LD 

HL,(WKADR) 


420 

CALL 

WKCHK 


421 

JR 

C,MVERR 


422 ； 




423 

EX 

DE.HL 

HLMWINXY) 

；DE <=s (WKADRi 

424 

LD 


425 

CALL. 

STSCRN 


426 ； 




427 

LD 

LD 

E,(IX+27) 

；IX+27 = WKPTR 

428 

DMIX + 28) 


429 

CALL 

LDSCRN 


430 ； 




431 

432 

LD 

LD 

L, (IX+16) 

H, UX+17, 


433 

CALL 

STSCRN 


434 ; 




435 

LD 

DE,(WKADR) 


436 

CALL 

LDSCRN 


437 

EX 

DE f ^L 


438 

CALL 

0CSR 


439 

LD 

(«W1NXY),DE 


440 

CALL 

•LOC 


441 

OR 

A 


442 MVE: 

443 

POP 

IX 


444 

POP 

HL 


445 

POP 

DE 


446 

POP 

BC 


447 

448 MVERR ： 

RET 



449 

LD 

HL,(eWINXY) 


450 

LD 

(IX+16>,L 


451 

LD 

(IX+17) ,H 


452 

LD 

DE,(WORDBF) 



453 

454 

455 

456 

457 

458 

459 

460 

461 

462 

463 «PRNT: 

464 

465 

466 

467 

468 ; 

469 

470 

471 

472 

473 

474 

475 

476 

477 ❺ PRT1 : 

478 

479 

480 
A81 

482 (IPRT2 : 


(IX+18),E 
(IX+19 し D 


PUSH AF 
PUSH HL 


CALL XPRNT 
CALL ©CSR 
LD A,(©WIDTH) 
CP L 

JR NZ,«PRTE 
CALL LNCNT 
CALL #LTNL 
JR ®PRTE 




13 


NZ,«PRT2 
CALL ®LTNL 
JR «PRTE 


Acc print 
HL <== YX 


483 

484 

485 

486 

487 «PRT3: 

488 

489 

490 

491 

492 

493 

494 

495 

496 ®PRT4 : 

497 

498 

499 

500 

501 

502 

503 

504 

505 


CP 12 
JR NZ,0PRT3 
CALL CLS 
JR ®PRTE 

CALL «CSR 
CP 28 
JR NZ t «PRT4 
INC L 

LD A,(dWIOTH) 
CP L 
CALL Z,«LTNL 
JR «PRT8 

CP 29 
JR NZ,®PRT5 
DEC L 
LD A t L 
CP 0FFH 
JR NZ.0PRT8 
LD A t (©WIDTH) 
DEC A 
LD L，A 


HL <== YX 


148 Oh ! X 1988.7. 


B37218 04 
B374 

B374 FE IE 
B376 20 09 
B378 

8378 25 

8379 7C 
B37A FE FF 
B37C 20 12 
B37E 24 
B37F 18 OF 
B381 

8381 FE IF 
B383 20 OE 
B3B5 24 
8386 3A DA BO 
B389 BC 
B38A 20 04 
B38C 25 
B38D CD AF B5 
U390 

B390 CD 8F B4 
8393 
B393 El 
B394 FI 
B395 C9 
B396 
B396 
B396 F5 
B397 3H 24) 
B399 CD 26 B3 
B39C FI 
B39D C9 
B39E 
B39E 
B39E F5 
B39F H5 
B3A0 C!) 67 B4 
B3A3 24 
B3A4 3A DA BO 
B3A7 BC 
B3A8 20 04 
B3AA CD AF B5 
B3AD 25 
B3AE 

B3AE 2E 00 

B3B0 CD 8F B4 

B3B3 El 

B3B4 FI 

B3B5 C9 

B3B6 

B3B6 

B3B6 E5 

B3B7 CD 67 B4 

B3BA 2C 

B3BB 2D 

B3BC C4 9E B3 

B3BF El 

B3C0 C9 

B3C1 

B3C1 

B3C1 F5 

B3C2 D5 

B3C3 

B3C3 iA 

B3C413 

B3C5 FE 0D 

B3C7 2811 

B3C9 CD 26 B3 

B3CC 18 F5 

B3CE 

B3CE F5 

B3CF D5 

B3D0 

B3D0 1A 

B3D113 

B3D2 B7 

B3D3 28 05 

B3D5 CD 26 B3 

B3D818 F6 

B3DA 

B3DA D1 

B3DB FI 

B3DC C9 

B3DD 

B3DD 

B3DD E3 

B3DE 

B3DE 7E 

B3DF 23 

B3E0 B7 

B3E128 05 

B3E3 CD 26 B3 

B3E6 IB F6 

B3E8 

B3E8 E3 

B3E9 C9 

B3EA 

B3EA 

B3EA C5 

B3EB H5 

B3EC CD 67 B4 

B3EF 78 

B3F0 95 

B3F147 

B3F2 3E 20 

B3F4 

B3F4 CD 26 B3 
B3F710 FB 
B3F9 El 
B3FA Cl 
B3FB C9 
D3FC 
B3FC 
B3FC D5 
B3FD E5 
B3FB 

B3FE CD 2120 
B401 F5 
8402 CD CD IF 
B405 28 3A 
8407 FI 
B408 FE OD 
B40A 28 05 
B40C CD 26 B3 
D40F 18 ED 
B411 

B411 CD 67 B4 

B414 

B414 AF 

B415 BC 

8416 28 07 

B418 25 

B419 CD 8F B5 

B41C 20 F6 

B41E 

B41E 24 

B41F 


506 

507 «PRT5 : 
598 

509 

510 «PRT6 : 

511 

512 

513 

514 

515 

516 

517 »PRT7 : 

518 

519 

520 

521 

522 

523 

524 

525 

526 ®PHT8 : 

527 

528 ^PRTE： 

529 

530 

531 

532 : 

533 «PRNTS : 

534 

535 

536 
53? 

538 

539 ； 

540 ❺ LTNL: 

541 

542 

543 

544 

545 

546 

547 

548 

549 

550 9NL1 : 

551 

552 

553 

554 

555 

556 ； 

557 «NL: 

558 

559 

560 

561 

562 

563 

564 

565 ； 

566 9MSG： 

567 

568 

569 0MSGL： 

570 

571 

572 

573 

574 

575 

576 ； 

577 0MSX： 

578 

579 «MSXL： 

580 

581 

582 

583 

584 

585 

586 9HSE ： 

587 

588 

589 

590 ； 

591 ®MPRNT： 

592 

593 ®MPRL: 

594 

595 

596 

597 

598 

599 

600 «MPRE : 

601 
602 
603 ； 

604 场 TAB: 

605 

606 

607 

608 

609 

610 
611 

612 鮝 TABL: 

613 

614 

615 

616 

617 

618 ; 

619 «GETL： 

620 
621 

622 ©GETLL： 

623 

624 

625 

626 

627 

628 

629 

630 

631 

632 #GETL1 : 

633 

634 «GBTL2： 

635 

636 

637 

638 

639 

640 

641 省 GETL3: 

642 

643 «GETL4 : 


JR ®PRT6 

CP 30 
JR NZ,#PRT7 

DEC H 
LD A,H 
CP OFFH 
JR N2,»PRT8 
INC H 
JR dPRT8 

CP ：U 
JR NZ,»PRTE 
INC H 

LD A,(«MXLIN) 
CP H 

JR NZ, 磉 PRT8 

DEC H 
CALL SCROLL 

CALL «LOt： 

POP HL 
POP AF 
RET 


PUSH AF 
LD A〆• 
CALL «PRNT 
FOP AF 
RET 


PUSH AF 
PUSH HL 
CALL 4ICSH 
INC H 

LD A, (<#MXL1N) 
CP W 
JR NZ.9NL1 
CALL SCROLL 
DEC H 

LD L 9 0 
CALL 0LOC 
POP HL 
POP AF 
RET 


PUSH HL 
CALL ®CSR 
INC L 
DEC L 

CALL NZ,«LTNL 
POP HL 
RET 


PUSH AF 
PUSH DE 

LD A,(DE) 
INC DB 
CP 13 
JR Z 9 #NSE 
CALL «PHNT 
JR 9MSGL 

PUSH AF 
PUSH DE 

LD A t (DE) 
INC DE 
OR A 
JR Z.9HSE 
CALL «PRNT 
JR dMSXL 

POP DE 
POP AF 
RET 


EX (SP ) 9 HL 

LD A f (HL) 
INC HL 
OR A 

JR Z,#MPRE 
CALL »PRNT 
JR ❹ MPRL 

EX (SP) V HL 
RET 


PUSH BC 
PUSH HL 
CALL 0CSR 
LD A,B 
SUB L 
LD B ( A 
LD A, 1 * 

CALL «PRNT 
DJNZ #TADL 
POP HL 
POP BC 
RET 


PUSH DE 
PUSH HL 

CALL #FLGBT 
PUSH AF 
CALL iBRKEY 
JR 7” 场 GETB 

POP AF 
CP 13 
JR Z.^GETLl 
CALL «PRNT 
JR 9GETLL 

CALL 省 CSR 

XOR A 
CP H 

JR Z, ❹ GETL4 

DEC H 
CALL ?LCNT 
JR NZ.9QETL2 

INC H 


HL ==> VX 


HL <== YX 


；not over bottom 


HL ==> YX 


HL <== YX 


；Y <== Y -1 
；line connect? 


►するってえと a- アジールのサイコフレームは V8 の後継機種に開発されたとおっしゃる 
んで。それにしても88がクツの裏なんて，それじゃ一あんまりクツの裏がかわいそうすぎ 
ます。 龍尾謙二 （21) 岐阜県 







B41F 
B421 
B421 CD 
B42412 
8425 13 
B426 2C 
B427 3A 
B42A BD 
BI2B 20 
B42D CD 
H430 20 
B432 
B432 IB 
B4331A 
B434 Ft 
B436 28 
B13813 
B439 AF 
IM3A 12 
B43B CD 
BUH K1 
B13F D1 
B4 I0 C9 
8441 
BA4\ CD 
BM4 FI 
B445 El 
B4I6 D1 
B447 3E 
B44912 
B44A C9 
B14B 
B44B 
B44B F5 
B44C 07 
B44D 07 
B14E 07 
B44F 07 
B450 CD 
B453 CD 
B456 FI 
B457 CD 
B45A CD 
B45D C9 
B45E 
B45E 
BASE 7C 
B45F CD 
B462 7D 
B463 CO 
B466 C9 
B467 
B467 
B467 F5 
B468 CD 
B46B 3A 
B46E 3C 
B46F 95 
B470 2F 
B4713C 
B472 6F 
B473 3A 
B476 3C 
B477 94 
B478 2F 
B479 3C 
B47A 67 
B47B FI 
B47C C9 
B47D 
B47D 
B47D E5 
B47E 3A 
R4813C 
B482 85 
B483 6K 
B484 3A 
B487 3C 
8488 84 
B489 67 
B48A CD 
B48D El 
B48E C9 
B48F 
B48F 
B48F F5 
B490 E5 
8491 
8491 3A 
B494 3D 
B195 BD 
B496 38 
8498 3A 
B49B 3C 
B49C 85 
B49D 6F 
B49E 
B49E 3A 
B4A1 3D 
B4A2 BC 
B4A3 38 
R4A5 3A 
B4A8 3C 
B4A9 84 
B4AA 67 
B4AB CD 
B4AE 
B4AE El 
B4AF FI 
B4B0 C9 
B4B 
B4H 
B4B 
B4B 
B4B1 
B4B2 
BAB2 
B4B2 
B4B2 
B4B2 
B4B2 
B4B2 
B4B2 
B4B2 
B4B2 
B4B2 
B4B2 E5 
B4B3 DD 
BiD6 21 
B4B9 BE 
B4BA 30 
B4BC DD 
B4BF 38 
B4C128 
B4C3 3D 
B4C4 47 
B4C5 FB 
B4C7 38 


LD 


L,0 


7D B4 

D9 BO 
F4 

8K B5 
EC 


BB IF 
26 B3 


BB IF 
26 B3 


4B B4 
4B BA 


644 

645 ©GETL5： 

646 

647 

648 

649 

650 

651 

652 

653 

654 

655 m；HTL6 : 

656 

657 

658 

659 

660 
661 
662 
663 
661 

665 

666 

667 ^GF.TB： 

668 

669 

670 

671 

672 

673 

674 

675 ； 

676 ®PRTH\ : 

677 

678 

679 

680 
681 
682 

683 

684 

685 

686 

687 

688 ； 

689 #PRTHL： 

690 LD A，H 

691 CALL «PRTHX 

692 LD A t L 

693 CALL ^PRTHX 

694 RET 

695 ； 

696 «CSR : 


CALL 袋 SCRN 
LD (DE),A 
INC DE 
INC L 

LD A,(©WIDTH) 
CP L 

JR NZ.WGFTL5 
CAL し ?LC；NT 
JR NZ,«GHTL3 


,(DE) 


LD 
CP 

JR Z f «GETL6 
INC DE 
XOR A 
LD <DE し A 
CAL し «LTNL 
POP HL 
POP DE 
RET 

CALL »LTNL 
POP AF 
POP HL 
POP DE 
LD A,1BH 
LD (DE) t A 
RET 


PUSH AF 

RLCA 

RLCA 

RLCA 

RLCA 

CALL #ASC 
CALL »PRNT 
POP AF 
CALL #ASC 
CALL O^PRNT 
RET 


697 

698 

699 

700 

701 

702 

703 

704 

705 

706 

707 

708 

709 


A,(»WINXY+1) 


720 

721 

722 

723 

724 

725 

726 

727 ; 

728 «LOC： 

729 


PUSH AF 
CALL XCSR 
LD A,(«WINXY) 
INC A 
SUB L 
CPL 
INC A 
LD L f A 
LD 
INC 

SUB H 
CPL 
INC A 
LD H 9 A 
POP AF 
RET 


PUSH HL 

LD A,(^WINXY) 
INC A 
ADD A V L 
L,A 

A,(0W1NXY+1 
INC A 
ADD A f H 
LD H,A 
CALL XSCRN 
POP HL 
RET 


LD 

LD 


PUSH AF 
PUSH HL 


A,(©WIDTH) 


礼 OCE 
(^WINXY) 


礼 OCE 
師 INXY+U 


67 BO 


730 

731 

732 

733 DEC 

734 CP 

735 JR 

736 LD 

737 INC 

738 ADD 

739 LD 

740 ； 

741 LD 

742 DEL- 

743 CP 

744 JR 

745 LD 

746 INC 

747 ADD 

748 LD 

749 CALL %LOC 

750 ©LOCE ： 

751 POP HL 

752 POP AF 

753 RET 

754 ； 

755 «WIDCH: 

756 «MON: 

757 轚 BOOT: 

758 RET 

759 

••寧韋拿拿拿專拿拿拿拿拿拿拿尊拿拿拿拿拿拿拿拿拿 

SUBROUTINES 拿 

; 拿拿拿傘拿拿拿拿 t 拿拿拿拿拿拿拿零拿拿拿拿 


7E 12 
5C IP 


25 

9610 


760 

761 

762 

763 

764 

765 

766 

767 

768 

769 WIDLIN 

770 

771 

772 

773 

774 

775 

776 

777 

778 

779 

780 

781 


Breg. <== WIDTH 
Creg. <== MAXLIN 
IX+16 = WINXY 
AF <== XXX 


CP 

JR NC.XYERR 
SUB (1X416) 
JR C,XYERR 
JR Z.XYERR 
DEC A 
LD B,A 
CP 3 

JR C,XYERR 


width over? 

A <== X2 - XI 

A < e ? 


B4C9 

B4C9 

B4CC 

B4CF 

B4D0 

B4D2 

R4D5 

B4D7 

B4D9 

B4DA 

B4DB 

B1DD 

B.IDF 

B4DF 

B4E0 

B4H 

B‘IE 

R1E2 

H4E3 

B4E^ 

BIE 

B1E 

B4H 

B4K 

B4H 

B4K 

BIE 

B4E 

BSE5 

B4Eb 

B4H7 

B4HA 

B4EB 

B4EE 

B4EF 

B4F0 

B4F1 

B4F3 

IMF4 

B4F5 

IMF 5 

B4F5 

B4F5 

B4F5 

B4F5 

B.1F5 

B4F5 

B4F5 

B4F6 

B4F7 

B4F8 

B4F8 

B4F9 

B4FA 

B4FA 

B4FD 

B4FH 

B501 

B502 

B503 

B504 

B506 

B507 

R508 

8509 

B50A 

B50C 

B50C 

B50D 

B50E 

B50F 

B5 

B5 


DD 7E 13 
215B IF 
BE 

30 OF 
DD 9611 
38 OA 
28 08 


B7 

ED 52 


782 ; 

783 

784 

785 

786 

787 

788 

789 

790 

791 

792 

793 

794 ； 

795 

796 

797 XYERR： 

798 

799 

800 
801 
802 

803 

804 

805 

806 

807 

808 WKCHK 

809 

810 
811 
812 

813 

814 

815 

816 
817 
BIB 

819 

820 
821 
822 

823 

824 

825 

826 

827 STSCRN： 

828 

829 

830 

831 STL1 : 

832 

833 

834 STL2： 

835 

836 

837 

838 

839 

840 

841 

842 

843 

844 

845 

846 

847 ； 

848 

849 

850 

851 

852 

853 

854 

855 

856 

857 

858 LDSCRN 

859 


LD A,(IXtl9) 
LD HL,HMXLIN 
CP (HL) 

JR NC,XYERR 
SUB (1X417) 

JR C,XYERR 
JR 7., XYERR 
DEC A 
1,D C,A 


line over? 

A <== Y2 - Y1 


JR 


C, XYERR 


POP HL 
*RET 

SCF 

POP HL 
RET 

CHEC K WORK 

HI, = WORK ADU. 

Bro«. = W1UTH ♦ 2 

Creg. = MXLIN + 2 

DE <== NEXT ptr. 


PUSH HL 
LD E.C 
LI) D, B 
CALL MULDE 
ADD H し, 

LD DE,(#WKSIZ) 


EX 

OR 

SBC 

POP 

RET 


DE f HL 


HloDH 

HL 


SCHKKN ==> WORK 

BC = (WlDTH+2,MXLIN4-2) 

DH s WORK ADR. 

HL = (Y1,X1) 

(BC f DE,HL) <== XXX 


PUSH BC 
PUSH DH 
PUSH HL 


PUSH HL 
PUSH BC 

CALL XSCRN 
EX DE.HL 
CALL #POKE 
EX DE ， HL 
INC DE 
INC L 
DJNZ STL2 
POP BC 
POP HL 
INC H 
DEC C 
JR NZ.STL1 


HL 


POP 
POP 
POP 
RET 

WORK ==> SCREEN 

BC = (WIDTH+2,MXLIN+2> 

DE = WORK ADR. 

HL = (Y1,X1) 


CD 61 BO 
22 84 BO 


B5 

BS 

0522 

B523 

B523 

B524 

B527 

B528 

B529 

B52A 

B52B 

B52D 

B52F 

B532 

B533 

B536 

B537 

B538 

B539 

B53A 

B53B 

B53D 

B53D 

B540 

B543 

B544 

B545 

8546 
B547 
0547 

8547 
8547 
B547 
B547 
B548 
B549 
B54A 
B54A 
B54D 
B550 
B551 
B551 
B553 
B554 
B555 
B557 
B558 
D559 
B559 
B55C 
B55F 


E5 

CD 67 B0 
2186 BO 


10 F6 
36 00 
2186 BO 


2A 84 B0 
CD 67 B0 


860 

861 

862 

863 

864 

865 

866 LDL1： 

867 

868 

869 

870 

871 LDL2: 

872 

873 

874 

875 

876 

877 

878 

879 

880 
881 
882 

883 

884 

885 

886 

887 

888 

889 ; 

890 

891 

892 

893 

894 

895 

896 

897 

898 

899 

900 CLS： 

901 

902 

903 

904 ; 

905 

906 

907 

908 CLS1： 

909 


PUSH BC 

PUSH DE 

PUSH HL 

CALL XCSR 

LD (WORDBF),HL 

FOP HL 

PUSH HL 

PUSH HL 
CALL XLOC 
LD HL,STRBUF 
PUSH BC 

EX DE V HL 
CALL #PKHK 
EX DE.HL 
INC DE 
LD (HL) f A 
INC HL 
DJNZ LDL2 
LD (HL),0 
LD HL.STRBUF 
HX DE,HL 
CALL %MSX 
HX DE.HL 
POP BC 
POP HL 
INC H 
DEC C 
JR NZ.LDLl 

LD HL,(WORDBF) 

CALL XLOC 

POP HL 

POP DE 

POP BC 

RET 


PUSH BC 
PUSH DE 
PUSH HL 


top of line buf. 


21 00 00 
3A DA B0 


DE.STRBUF 

A, (©WIDTH) 

B, A 


LD (DE),A 
INC DE 
DJNZ CLS1 
XOR A 
LD (DE) r A 


LD 


HL f 0 

A» (省 MXLIN} 
B.A 


►生協でなら Oh!X が490円で買える。大学に受かってよかった! 


THE SSTINEL 


天見卓志 （18) 大阪府 
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LD DE f STRBUF 
CALL m.oc 
CALL %MSX 
INC H 
DJNZ CLS2 
LD HL,0 
CALL ®LOC 

XOR A 

LD HL,«LCFLG 
LD (HL),A 
INC HL 
LD (HL).A 
INC HL 
LD (HL) t A 
LD HL,0 
CALL m.OC 

POP HL 
POP OE 
POP BC 
RET 

LINE CONNECT 
Hreg, = LINE 


clear 

line 

connect 

fiaK 


PUSH AF 
PUSH HL 
CALL LCTSB 
OR (HL) 

LD (HL) V A 
POP HL 
POP AF 
RET 

LINE CONNECT? 

Hreg. = LINE 


PUSH HL 
CALL LCTSB 
AND (HL) 

POP HL 
RET 

I = LINE no. 

\l <== ®LCFLG + ALPHA 
‘ <==CONNECT BIT 


TSB： # 


PUSH BC 
PUSH HL 
INC H 
LD A,01H 


JR NZ.LCTL 

POP HL 

SRL H 

SRL H 

SRL H 

LD B t 0 

LD C,H 

LD HL f eLCFLO 

ADD HL.BC 

POP BC 

RET 

SCROLL IN WINDOW 
Acc <== XXX 


PUSH BC 
PUSH DH 
PUSH HL 


A,taWINXY+1J 
H.A 

A,(«WINXV) 

A 

L,A 

DE.STRBUF 
A f (0HXLIN) 


JR 

INC I 
INC I 
PUSH I 
PUSH I 
LD 
LD 

CALL : 
INC 1 


A,(^WIDTH) 
B f A 


；A <22 char. 


DJNZ SCRL2 

XOR A 
LD (D£),A 
POP HL 
POP DE 
DEC H 
CALL XLOC 
CALL %MSX 
DEC C 

JR NZ.SCRL1 


HL rr> YX 
line copy 


PATCHING S-OS SUB. 


LD A,(WINFLO) 
OR A 
RET NZ 

PUSH DE 

LD lX f #TABLE 

LD B,(IX^0) 
INC IX 

LD HL f #PATCH 

INC HL 
LD E 9 ( 1X40) 

LD D パ IX+1> 
LD A,(DE) 

LD C f (HL) 

EX DE,HL 
LD <HL) f C 
LD (DE),A 
INC DE 
INC HL 
LD A t (DE) 

LD C,(HL) 

EX DE V HL 
LD (HL),C 
LD (DE),A 

INC HL 
INC IX 
INC IX 
DJNZ PATL 
POP DE 
RET 


PUSH BC 
PUSH HL 

LD A,(«WINXY) 
INC A 
U) L,A 
CALL %LOC 
LD A,(^WIDTH) 

LD B,A 

CALL XPRNTS 
DJNZ LNHRL 
POP HL 
POP BC 
RET 

Window 11 ine disp. 
Hreg. = Bide char. 
Lreg. = Bpaoe code 
Acc <== XXX 


PUSH BC 

PUSH DE 

PUSH HL 

CALL XCSR 

LD (WORDBF) t HL 

POP HL 


112 

113 

114 

115 

116 
!17 
118 

119 

120 
121 
122 

123 

124 

125 

126 

127 

128 

129 

130 

131 

132 

133 

134 

135 

136 

137 

138 

139 

140 
Ml 

142 

143 

144 

145 

146 

147 

148 

149 

150 

151 

152 

153 
J54 

155 

156 

157 

158 

159 

160 
161 
162 

163 

164 

165 

166 

167 

168 
169 


052 

053 

054 

055 

056 

057 

05B 

059 

060 

061 

06^ 

063 

064 

065 

066 

067 

068 

069 

070 

071 

072 

073 

074 

075 

076 

077 

07H 

079 

080 

081 

082 

083 

084 

085 

086 

087 

0B8 

089 

090 

091 

nw 

093 

094 

095 

096 

097 

098 

099 

100 

101 

102 

103 

104 

105 

106 

107 

108 

109 

110 


BS60 
B560 11 
B563 CD 
B566 CD 
R569 21 
B56A 10 
H66C 21 
B56F CD 
A572 
B572 AF 
B573 21 
B57(S 77 
8577 23 
B578 77 
0579 23 
B57A 77 
B57B 21 
R57k* r：D 
B581 
B5H1 El 
B582 D1 
H583 Cl 
B584 G9 
B585 
B585 
B5B5 
B585 
B585 
B5H5 F5 
B586 E5 
B587 CD 
B58A R6 
B58B 77 
B58C HI 
B58D FI 
R58E C9 
B58F 
B58F 
B58F 
B58F 
B58F 
B58F E5 
8590 CD 
B593 A6 
B594 El 
B595 C9 
B596 
B596 
B596 
B596 
B596 
8596 
8596 C5 
B597 E5 
B598 24 
B599 3E 
B59B 
B59B OF 
B59C 25 
B59D 20 
B59P 
B59F El 
B5A0 CB 
B5A2 CB 
B5A4 CB 
B5A6 06 
B5A8 4C 
B5A9 21 
B5AC 09 
B5AD Cl 
B5AE C9 
B5AF 
D5AF 
B5AF 
B5AF 
B5AF 
B5AF C5 
B5B0 D5 
B5B1 E5 
B5B2 
B5B2 3A 
B5B5 67 
B5B6 3A 
B5B9 3C 
B5BA 6F 
B5BB 11 
B5BE 3A 
B5C1 3D 
B5C2 4F 
B5C3 28 
B5C5 
B5C5 24 
B5C6 24 
B5C7 D5 
B5C8 E5 
B5C9 3A 
B5CC 47 
B5CD 
B5CD CD 
B5D0 2C 
B5D112 
B5D213 
B5D310 
B5D5 
B5D5 AF 
B5D612 
B5D7 El 
B5D8 D1 
B5D9 25 
B5DA CD 
B5DD CD 
R5E4) OD 
BSE\ 20 
B5E3 
B5E3 24 
B5E4 CD 
B5E7 21 
R5HA CB 
B5EC 23 
D5ED CB 
B5EF 23 
B5F0 CB 
B5F2 
B5F2 El 
B5F3 D1 
B5F4 Cl 
B5F5 C9 
B5P6 
B5F6 
B5F6 
B5P6 
B5F6 
B5F6 


86 BO 
8F B4 
4F BO 


D8 BO 
D7 BO 


919 Cl 

920 

921 

922 

923 

924 

925 

926 

927 ; 

928 

929 

930 

931 

932 

933 

934 

935 

936 

937 : 

938 

939 

940 

941 

942 

943 

944 

945 

946 LN 

947 

948 

949 

950 

951 

952 

953 

954 

955 

956 

957 

958 

959 ?L 

960 

961 

962 

963 

964 

965 

966 

967 

968 

969 

970 LC 

971 

972 

973 

974 

975 LC 

976 

977 

978 

979 ； 

980 

981 

982 

983 

984 

985 

986 

987 

988 

989 

990 

991 

992 

993 

994 SC 

995 

996 

997 

998 ; 

999 
000 
001 
002 
003 
004 
005 
006 
007 
008 

009 SC 


D9 BO 

64 BO 

F8 


F6 B5 
DB BO 


0 
0 
020 
021 
022 ； 
023 
02! 

025 

026 

027 

028 

029 

030 

031 

032 SC 

033 

034 

035 

036 

037 

038 

039 


1170 WINXY： DEFS 4 

171 WIDTH： DEFS 1 

172 MXLIN: DEFS 1 

173 LCBUF: DEFS 3 

174 XYBUF： DEFS 2 

175 WKPTR： DEFS 2 

176 NEXT： 


B5F6 C5 
B5F7 E5 
B5F8 3A D7 BO 
B5FB 3C 
B5FC 6F 
B5FD C!) 67 BO 
B600 3A l>y BO 
B603 47 
B604 

B604 CD 43 BO 

B60710 FB 

B609 HI 

B60A Cl 

B60B C9 

B60C 

B60C 

B60C 

B60C 

B60C 

B60C 

B60C 

B60P C5 

B60!) D5 

B60E E5 

B60F CD 61 BO 

R612 22 84 BO 

B615 El 

B616 

B616 7C 

B617 \i 

B61813 

8619 05 

B61A 71) 

B61B 12 
B6IC 13 
B61D 10 FB 
B61F 7C 
B620 12 
B62113 
8622 AP 
B62312 
B624 D1 
B625 CD 4F BO 
B628 Cl 
B629 E5 
B62A 2A 84 B0 
B62D 24 
B62E CD 67 BO 
B631 El 
B632 C9 
B633 
8633 
B633 
B633 

B633 3A 7F BO 
8636 B7 
B637 CO 
B638 
8638 D5 
B639 DD 2115 
B63C B0 
B63D DD 46 00 
B640 DD 23 
B642 2140 B0 
B645 
B645 23 
8646 DD 5E 00 
B649 DD 56 01 
B64C 1A 
B64D 4E 
B64E EB 
B64F 71 
B65012 
B65113 
B652 23 
B6531A 
B654 4E 
8655 EB 
B656 71 
8657 12 
B658 23 
8659 DD 23 
B65B DD 23 
B65D 10 E6 
B65F D1 
B660 C9 
B661 
B661 
B661 
BS61 
B661 E5 
B662 2100 00 
B665 7B 
B666 5A 
B66716 00 
B669 
8669 B7 
B66A 28 OB 
B66C CB 3F 
B66E 30 01 
B67019 
B671 

B671 CB ^3 
B673 CB 12 
B67518 F2 
B677 
B677 5D 
B678 54 
B679 El 
B67A C9 
B67B 
B67B 
B67B 
B67B 
B67B 
BB00 
B800 
B800 

B800 00 00 00 
B803 00 00 00 
B806 00 00 00 
8809 00 00 00 
B80C 00 00 00 
B80F 00 
B810 00 00 00 
B813 00 
B814 00 
B815 00 
B816 00 00 00 
B819 uo oe 
B81B 00 00 
B81D 


;B <== KAZU 
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ボケコンの新しい世界 

PC-E200/500 

山本信 Yamamoto Makoto 


今回シャープから発売された2機種のポ 
ケコン PC - E 200 (22,000円）と PC _ E 500(2 
8,800円）は，これまでのシャープのボケ 
コン （ PC -1200/1300/1400 シリーズ）とは 
またひと味違う新たなるシリーズ展開を見 
せています。 

まず外見ですが，丸みを帯びたダークグ 
レイのボディはなかなか高級感を持ってい 
ます0ディスプレイやキーの配列は，1300 
シリーズと1400シリーズの中間といったと 
ころです。どちらもポケットには少々大き 
めですが（重さは E 200 が 280 g ， E 500 が250 
g ), ポケットコンピュータと書いてあると 
ころを見ると，どうやらコートのポケット 
にでも入れる気でしようか。 

また，中身のほうも従来のものと比べて 
かなり変化しており， E 200 と E 500 との間で 
もかなり違っています。この2 つのマシン 
は，外観は似ていますがどうやら中身はま 
つた 〈別のマシンと いえそうです。 


Z 80 搭載ポケコン PC - E 200 


E 200 の特徴は，まずなんといっても CPU 
に Z 80 ( CMOS 版）を搭載していることで 
す。このため，たとえば XI などでボケコン 
のプログラムを開発して， RS -232 C で転送 
して使うなどといったことが簡単にできる 
ようになります。また， BASIC にモニタモ 
ードがあるので，簡単なものですがマシン 



PC - E 200 


語モニタを使うこともできます。ただメモ 
リマップなどが公開されていないので，い 
まひとつ使い方がはっきりしないのが残念 
です。早く公開してくれることを期待しま 
しよラ。 

E 200 を従来のボケコンと比べてみると， 

スピードは Z 80 のおかげもあり PC -1475 に 
比べて4倍ほど速くなっています。また， 
表示能力は24字 X 4行で，かなりの進歩が 
みられます。 

ソフトウェアの面から見た特徴は，電卓 
モードがないことでしよう。最近のシャー 
プのポケ コンには 電卓モードが付いている 
ものが多かったのですが，このマシンでは 
あえてそれを付けていないようです。実際， 
ボケコンを使うときは電卓モードではなく， 
計算式を見たあとから訂正ができる ， RUN 
モードを使うことが多いでしよう。ポケコ 
ンには RUN モードと PRO モードとがあり， 
RUN モードではプロダラムを打ち込めな 
いので，数字を直接打ち込んでも行番号と 
間違えられることがありません。 

また，このときラストアンサ機能や ， C 
ONST 機能を使うことができます 。 CONS 
T 機能というのは，ある演算 （4 を足すと 
か3を掛けるなど）を定義すれば，それを 
自動的に実行してくれる機能で，同じ計算 
を繰り返し行うときに便利です。 

このほか86種類の関数が使え，2変数統 
計もできるといった点で関数電卓としても 
なかなかのものだといえるでしよう。ただ 
し，統計計算ではデータをあとから確認で 
きないので少々不便ですが，それほどデー 
夕が多くなければたいして困ることはあり 
ません。 

BASIC は，従米からのシャープのポケコ 
ン BASIC の拡張ですが， PC -88/98 の N 88- 
BASIC に似た感じで拡張が行われています。 
これは移植性を考虛したものでしよう。も 
ちろん従来機 （ PC -1400 シリーズ）のプロ 



グラムをテープから読むこともできます。 
また， RAM をプログラムファイルとして 
使用できるので，使わないプログラムをし 
まってぉくことが可能です。通常は外部記 
憶を持づていないポケコンにとって，この 
機能は必需品といえるでしよう。 

また， TEXT キーを押すとテキストエデ 
ィタモードに入ります。このモードで， RS - 
232 C を通じ， BASIC プログラムをパソコン 
との間で受け渡しすることができます。 

さらに CASL モードというものもありま 
す。これは，情報処理技術者試験で出題さ 
れる仮想コンピュータ COMET のアセンブ 
ラ CASL の学習用に作られたものです。先 
述のテキストエディタモードで書いたプロ 
グラムを， CASL シミュレータで実行する 
ことができます。電車のなかや学校など，ち 
ょっとした時間を使って情報処理技術者試 
験の勉強をするには便利でしよう。 


ミニワークステーション PC - E 500 


E 500 は，ポケ コンと いうよりもポケット 
ワークステーションと でもいうべきもので、 
す。 CPU は Z 80 ではないようですが， E 200 
よりもさらに速く， PC -1475 の7倍速とな 
っています。また，表示能力も文字40字 X 
4行，グラフィックは 240X32 ドットとい 
うスペックを誇ります。 

しかし， E 500 のもっと凄いところはその 
ソフトウェアです。メニューキーを 押すと 
メニュー 画面になり， BASIC , CALC , MA 
TRIX ， STAT ， エンジニアの各メニュー 
をファンクションキーで 選択するようにな 
っています。 

まず BASIC ですが，これは E 200 の BAS 
1 C をさらに強化したものです。もちろん従 
来機のプログラムも読めますが，かなり強 
力な BASIC となっていて，まるで パソコン 
のようです（まるで98のようだという話も 
PC - E 200/500 151 



















PC - E 500 
ある)。 

また， E 500 の BASIC は 0 S としての機能 
も持っています。たとえば，本体内の RAM 
の一部を RAM ディスク （ RAM ファイルと 
いう）として使うことができ，また 64 K バ 
イトまでの増設 RAM カードも RAM ファイ 
ルとして使えるので， RAM カードをフロ 
ツピーディスク感覚で使うことができます。 
さらに，外付けの 2.5 インチ FDD ( CE -140 
F ) を使うことも可能です。そして ， BASIC 

に フォーマツ トや ファイルコピーな どの命 
令があるので，いちいちユーティリティを 
使ったりしないでいいところなどは，ハ 0 ソ 
コンを も上回っているといってもいいでし 
ょラ〇 

ほかにも，倍精度数値変数（仮数部20桁 
指数部2桁）が使用でき，テキストエディ 
タモードもあるので パソコン 用のプログラ 
ムを書いて， RS -232 C で転送するといった 
こともできます。さらに ， AER (数式登録 
機能）というものもあります。よく使う公 
式なのだが BASIC でプログラムを組むほど 
ではないといった場合，関数を作って登録 
しておけば，さっと呼び出して計算するこ 
とができます。この関数は BASIC プログラ 
ム内からも使うことができます0 

次に CAL モードですが，このモードでは 
普通の関数電卓として使用できます。数式 
通りに計算してくれるので，たとえば“1+ 
\*では4ではなく 3になります。メモリ 
も普通の電卓のメモリのほかに A 〜 Z ( A $ 
~ Z $) までのメモリが使え，これは BASIC 
と共通なので CAL モードと BASIC ともデ 
ータ交換をすることができます。また，も 
ちろん E 200 のように BASIC の RUN モード 
で計算することもできます。私は式が見え 
て便利なので RU N モードのほうをよく使っ 
ています。 

行列の計算をする MATRIX モードでは， 

1〇2 Oh! X 1988.7. 


メモリが許す限り任意の大きさの行列を使 
用でき，連立1次方程式を解くこともでき 
ます。また， BASIC の配列変数を使っての 
データのやりとりや， BASIC から行列演算 
機能を呼び出すこともできます。 

STAT モードは統計計蒭のモードです。 
このモードでは2変数統計も扱えます。デ 
ータも保存されるので修正や追加もでき， 
たいへん 便利です。また，データや結果を 
BASIC とやりとりすることができ，さらに， 
BASIC から統計計算機能を使うこともで 
きます。 


便利なエンジニアモード 


E 500 にはエンジニアモードが付いていま 
す。この機能はいままで紹介してきた各モ 
ードとは若干異なり，いわば実用プログラ 
ム集が ROM で入っているといったもので 
す。このプログラムはエンジニアリングソ 
フトウェアと呼ばれ，エンジニアのメニュ 
一を選択すると，数学，科学，工学，統計, 
編集のメニューが現れます。たとえば，数 
学ならニュートン法による方程式を解くプ 
ログラムが使え，科学では原子の周期表や 
物理定数の一览が，また，工学では複素数 
の計算など，全部で35個のエンジニアリン 
グソフトウェアをメニューで選択して使え 
るわけです。 

このモードのさらに凄いところは，メニ 
ューをューザーが変更できることと，ュー 
ザーが作った BASIC プログラムを RAM フ 
アイルにセーブしてメニューに登録すれば, 
最初から持っているソフトと同じようにメ 
ニューから呼び出すことができるという点 
です。この機能を使って，ボケコンを自分 
用にカスタマイズす n ば，まさにポケット 
ワークステーションとなるでしよう。 

ところで，メニューをよく見ると“デモ” 
という項目もあり，見てみるとデモプログ 
ラムが入っていました。 

このほか E 500 は細かいところがよくでき 
ています0キー ボー ドはロール オーバー （前 
のキーを離す前に次のキーが押せる）が可 
能になっていて，ちゃんとキーバッファも 
付いています。また， CTRL -0 でキークリ 
ックが 0 N /0 FF できるといった点も，ポ 
ケコンの キーは感触が頼りないので，あり 
がたいところです。この E 500 は，まさに使 


うために作られたマシンだといえるでしよ 
ラ。 

もう少し工夫のほしいマニュアル類 


両機種とも同じような マニュァルカす 付い 
てきますが，受ける感じはかなり違います。 

E 200 のほうは，初心者でもわかるように 
書かれています。これは E 200 がモードを減 
らした分，わかりやすいボケコンであると 
いったことにもよるのでしよう。 

一•方， E 500 の マニュァルは， 一兄まとま 
っているような印象を受けますが，読んで 
みると，なんでもかんでも詰め込まれてい 
るような感じがします。これだけの機能が 
あるのですから仕方がないともいえますが， 
これまでポケコンやパソコンを使ったこと 
のある人でないとわかりにくいようなとこ 
ろがあります。 

両方と も BASIC のリ ファレンスマニュア 
ルはコマンドがアルファベット顺に並んで 
いますが，これは機能別に分けたほうがよ 
かったでしよう。また，予約語の一覧がな 
いというのも困ったものです。しかし，最 
大の欠点は索引がないということです。昔 
ならそれでもよかったかもしれませんが'， 

これだけ機能が増加しているのですから早 
くなんとかしてもらいたいところです。 


E シリーズの将来に期待 


今後シャープのポケコンのうち， PC -13 
00/1400シリーズは E シリーズとして発展し 
ていくものと思われます。一方， PC -1200 
シリーズはワイシヤツの胸ポケツトにはい 
るという小ささを生かして，入門用，また 
は，業務専用ボケコンとして発展していく 
のではないでしようか。また，シャープと 
いえば最近電子手帳が話題になっています 
が，これがボケコンと結びついたら丽白い 
ことになるでしよう。とも力* く，£500の愛 
用者カードに書かれている項目などを見て 
も，シャープのこのシリーズに対する力の 
入れようがわかります。今後のポケコンカ* 
らは目が離せないといえそうです。 

PC - E 200 22,000円 

PC - E 500 28,800円 

ポケツトディスクドライブ CE - I 40 F (オプション） 

49,800円 

シャーブ S 06(62 l ) 1221， 03(260) 1161 















愛読者プレゼント 


プレゼントの応募方法 

とじ込みのアンケートはがきの該当項目をすべてご記 
入のうえ，希望するプレゼント番号をはがき右下のス 
ペースにひとつ記入してお申し込みください。締め切 
りは1988年7月18日の到着分までとします。当選者の 
発表は1988年9月号で行います。 



日本ファルコム S 0425(27)6501 


ソーサリアン 

Xlturbo シリーズ専用 
(modellO は要 CZ -8 BGR 2, 
CZ -8 BF 1) 

5"2□版9,800円 
2名 


ファンタジーファン待望のソーサリアン) ( Iturbo 版。はやる気持ちを 
抑えられない向きには，「とにかく早く始めたい人のためのインスタ 
ントパーティー j が用意されている。 


ゲームアーツ 003(984)1136 

2 

ゼ U アード 


XI turbo シリーズ 
2ドライブ専用 
(modellO では動作しません） 

5"2D 版7,500円 2 名 

ファンタジーロールプレイングの2本目はゼリアード。姫君と王国 
を窮地から救うために怪物たちと闘うヒーロー。アニメがなかなか 
芸が細かい。 




エ画堂スタジオ 003(353)7724 


a ■アルギースの翼 


XI turbo シリーズ 
2ドライブ専用 
(ただし X 丨でも F M 音源ボード 
があれば動作可能） 

5〃2 □版7,800円 3 名 


今月の フアン タ ジーゲームの 締め 
はアルギースの 翼。中世を思わせ 
る惑星を舞台にした SF . RPG 。 

戦闘シーンが見ものです。 



織-5 


エ画堂スタジオのロゴマーク入りデ 
ィスクケースを10名に。色はグレー。 


\4 


ハード 003(621)8447 

八ード社の社長が社員に面白いと 
認めさせたクイズ第1弾， 
君も成田へ行って 
身， 1 勝手にジヤンケン 

をしよ5 


バ0 


於、 


, 棘》 〆 ノ 










方 V ⑽ 


淡' v 


⑽納 .的 0 、, 


XI/XI turbo シリーズ用 
5'2 D 版6,800円 
10名 

略称「勝手に成ジャン j ゲームを 
10名の読者に。クイズ丨問を正解 
するごとに女の子のグラフィック 
が出てくるんだって。ウキウキ。 


5月号プレゼント当選者 


m 桃太郎伝説（東京都）安井研二（静岡県）砂子満圊紫醜罹 
(大阪府）松野康利（愛媛県）兵頭直樹固麻雀狂時代 SPECIAL 
(群馬県）成川浩一（埼玉県〉福辺徳明 ® コンピュータ言語進 
化論（宮城県）宗片陽一（静岡県）後藤智明（三重県）西川正哉 
以上の方々が当選されました。おめでとうございます。品物は順 
次発送いたしますが，入荷状況などによリ遅れることがあります。 
また，公正取引委員会の告示により，このプレゼントに当選された 
方は，この号の他の懸賞には当選できない場合がありますのでご了 
承ください。 


愛読者ブレ 










UESTIC3INI 



INIS\AAER 


X 68000 のスプライトコントロ 
ーラには構造的欠陥があるので 
はないでしようか。画面の上の 
ほうだとやたらチラつきます。付属のグラ 
ディウスでさえそうです0早急に調査をお 
願いします。 東京都鹿島真一 

ハードの制約により，正しくな 
いプログラムでは鹿島さんのお 
っしゃる症状は起こりえます。 

が，グラディウスが上記に当てはまるとも 
思えず，実際，チラつきを確認することは 
できませんでした。そこで，ここでは鹿島 
さんのハードの問題か I しれないと解答し 
たうえで，-般的な話をしておきます。 

スプライトを表示するには，まず ， CPU 
力 ？ ，スプライトコントローラのレジスタに 

表示する位置やパターン番号を書き込み， 

このデータとスプライ トハ 。ターンを CRTC 
が読み出して画面に表示するという2 つの 
段階があります。ここで注意しなければな 
らないのは， CPU がデータを書き込むのと， 
CRTC がデータを読み出すのを同時に行う 
わけにはいかないということです。そのた 
め，ス プライ トコントローラへのアクセス 
は図1のように CPU と CRTC が交互に行 
うようになっています。 

この仕組みは CRTC のように断続的にデ 
ータを読み出す側にとっては非常に都合の 
よい方法です。ところが，不定期的にデー 
夕を読み書きする CPU にとっては大きな制 
約となります〇 CPU が アクセスし ようとし 
たときが，図1の （ a ) の時点であれば ， C 
PU はすぐにデータの読み書きを行うこと 
ができますが， （ b ) のときに アクセス しよ 
うとすると， （ c > まで待たされてしまうの 
です（ウェイトが入るという）。この待たさ 
図丨 スプライトコントローラへの時分割アクセス 


れている間， CPU はなにもすることができ 
ません。ゲームのように速度が要求される 
場面では，この金縛りにあっている時間は 
無駄以外のなにものでもないわけです。 

これを 防ぐ ために， スフ。 ライト コントロ 
ーラへの アクセス 期間を CPU が独 A できる 
ような方法が用意されています。邪魔者が 
いなくなりますから， CPU は高速にデータ 
の読み書きができることになります。とこ 
ろがこの状態では今度は CRTC が アクセス 
できなくなってしまいますね。 CRTC 力 ? ア 
クセス できないということは画面になにも 
表示されないということ，つまり，スプラ 
イトの表示がすべてカットされてしまうと 
いうことです。この2 つの こと，「スプライ 
ト コントローラへの アクセス 時にはウェイ 
卜が入ることがある」，「ウェイトが入らな 
いようにするとスプライトが表示されなく 
なってしまう j が，最初に述べた制約に当 
たります。 

では，どうしたらよいかですが，その前 
に少し CR 丁デイスプレイの原理についての 
話をしてぉきたいと思います。 CRT (ブラ 
ウン管）の基本原理は，電子が蛍光体に当 
たると光るということと，電磁界に応じて 
曲がるというごく単純なものです。この原 
理と残像を利用してブラウン管での表示が 
行われます。具体的にはブラウン管の奥に 
ある€子銃から放たれた1本の電了-ビーム 
を適 A に曲げて（偏向させて），順に蛍光间 
全体に出てる（走赍する）ということを繰 
り返して表ボを行っています。この順序は 
左から右へ，そして上から下へです。左上 
から始めて右上まで走査したら左へ戻り， 

1ライン下を走査します。-番下のライン 
の走奔が済んだら，またん: I •.に戻って也杏 


を続けます。ある瞬間に光っているのは電 
子ビームが当たっているただ1点ですし， 
右から左へ戻るとき（水平帰線期間）と， 
下から上へ戻るとき（垂直帰線期間）にはデ 
ィスプレイにはなにも表示されていません 
力す，残像が残りますので我々の目にはちゃ 
んと1画面が表示されているように見える 
わけです。 

さて，このあたりでうまいぐあいにスプ 
ライトを表示するにはどうすればよいかが 
見えてきました。「画面になにも表示され 
ていない水平帰線期間ないしは垂直帰線期 
間にスプライトの表示をカットして一気に 
データを書き換える」のです。実際には水 
平帰線期間にはデータを書き換えるだけの 
十分な時間がありませんので，主に垂直帰 
線期間が利用されます。この方法はシャー 
プも推奨しているもので，解析したわけで 
はありませんが，グラディウスもこのよう 
にしてスプライト表示を行っているものと 
思われます。もうおわかりのように，垂直 
帰線期間内でデータの書き換えを終えるこ 
とができず，一瞬でもスプライトの再表示 
が'遅れてしまえばチラついてしまうことに 
なります。多量のスプライトを扱うゲーム 
プログラムではありうることです。 

なお，スプライトの数があまり多くなく 
ても，画面の上がチラつくことがあります。 
これは垂直帰線期間の検出方法がまずいた 
めです。正しいプログラムでは垂直表示期 
間から垂直帰線期間への変わり目を検出す 
るべきで，これなら垂直帰線期間をフルに 
使うことができるわけですが，「今が垂直帰 
線期間かどうか」だけを調べるようなプロ 
グラムでは，もしかすると垂直帰線期間 
が終わる寸前かもしれませんので時間が足 
りなくなってしまうのです。ただ，これも 
善し悪しで，単に垂直帰線期間になるまで 
侍つときの侍ち時間は最大でも「垂直表示 
期間分 j ですが，変わり目を検出するには 
最大で「垂直表示期間+垂直帰線期間」恃 
たなければなりません。 

なお，別り込みを利闹してロスタイムな 
しに埵|首.帰線期間への愛わり目を知るスマ 
一卜な方法もあります。 （村田敏幸） 


CRTC アクセス期間 
















CPU アクセス期間 i 



( a ) ( b ) 
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s-os の アスキー ファイルに関 
して質問があります。XIの HuB 
ASIC のファイル管理と SOS 
のそれとは同一であるということになって 
いますが， HuBASIC 上で作った ァスキー 
?ァイルが S-0S 上で （E-MATE などを使 
って）読み込めません。エンドコードを1 Ah 
から0 0 m へと変更するだけではだめなので 
しょうか0 三重県小松英生 

XIの HuBASIC と S-OS のファ 
イル管现の方法が同じであると 
いうのは，ディレクトリ テープ 
ル（ファイルの情報を記録しておくところ） 
や FAT (ファイルの大きさやっながり方を 
記録しておくところ）の位置が共通である 
ということです。 

しかし，いくらファイル管理の方法が同 
じでも，ファイル自体が異なれば当然お互 
いに読み書きすることはできないのです。 

ファイル自体が違うというのはどういう 
ことなのでしょうか。これは同じ内容のフ 
ァイルでも HuBASIC と S-OS では表記の 
方法が違うということなのです。っまり， 
S-OS でのアスキーファイルは厲性が Asc 
となっているだけで実質は マシン 語ファイ 
ル ( Bin ) とまったく一緒になっています0 

すなわち，ディレクトリテーブルにアス 
キーテキストの開始番地，サイズを書いて 
おくことによってファイルの大きさを知る 
ようになっているのです。 

一方， HuBASIC では アスキー ファイル 
の大きさは FAT を使って計算されます。す 
なわち， FAT を見て何クラスタ， f 可レコー 
ド使っているかを調べ，それをもとにして 
ファイルの大きさを出すのです。また，デ 
イレクトリテーブルの開始番地やサイズを 
普き込んでおく部分には，常に000 Oh が書 
き込まれます。 

少し脱線しますが，このようなファイル 
の表現法の違いはそれぞれのシステムにお 
ける アスキー ファイルの存在価値の違いに 
よるところが大きいのです。というのも， 
S-OS では アスキー ファイルといえばテキ 
ストですから，処理が単純なほうがよいし， 
基本的にオンメモリで考えればよいのでサ 


イズが 64K バイト取れれば十分なのです。 
そこで， Bin ファイルと 同じような フオー 
マットをとっているわけです。 

•方， HuBASIC では アスキー ファイル 
はデータファイルとして扱うことが多いの 
で，ファイル長を 64K バイトに制限される 
とイく便なのです 0 そこで FAT でファイル M 
を H 山に設定できるようになっているわけ 
です。 

さて， S-OS と HuBASIC のアスキーフ 
ァイルの違いは，ファイルの人*きさの衣 
法の違いだけではありません 0 ファイルの 
エンドコードも兜-なっているのです（これ 
は小松さんも试してみら n たようですが)。 
すなわち HuBASIC のアスキーファイルの 
エンドコードは IAh であるのに対し， S -0 
S でのアスキーファイルの エン ドコードは 

0011です。 

ところで，マシン語ファイルは HuBASI 
C と S-OS で://:換性があります。これはもう 
おわかりのように HuBASIC と S-OS で'マ 
シン語ファイルの衣記がまったく北通なた 
めです 0 ところがアスキーファイルでは典 
M でないためにファイルのやり取りができ 
ないのです。 

次に，邱山がわかったところでどうすれ 
ばよ いかを芩えてみましょう。 エンド コー 
ドを巧き換えただけでは，もちろんだめで 
す 0 そもそもファイルの人きさを知ること 
ができないために エン ドコードにたどり猗 
くことすらできないからです。 

ではどうするのかというと， エンド コー 
ドを外き換える以外にも，ファイルの人き 
さの情報を付け力 n ぇなければならないので 
す。 S-OS から HuBASIC に移すときは簡 
ホて、す。 エンド コードを 00 m から IAii に# 
き換え，さらに ディレクトリ テーブルの開 
始酡地，サイズ'の部分を000011で坪めれば H 
uBASICA のアスキーファイルの出米上<) 
です。 

逆に HuBASIC か GS-OS へと移すとき 
は少し面倒になります(といってもそれほ 
どではありませんが〉。エンドコードを IAij 
から 00 h に押き換えるのはもちろんですが, 
さらに FAT からフアイルのサイズを;汁兑し, 


ディレクトリテーブルのサイズの部分に齊 
き込まなければならないのです（開始番地 
は000 Oh のままで OK)。 

FAT に関する詳しい説明は文献を読んで 
いただきたいのですが， FAT からファイル 
のサイズを計算するにはそのファイルが全 
域を使用しているクラスタ数 a , レコード 
数 b を求め，さらにファイルの敁終レコー 
ドを読み込んでエンドコードを探すことに 
よって最終レコード内で使っているバイト 
数 c を求め， 

ax4096+bx256+c 

とします。 

たとえば， HuBASIC 上のあるアスキー 
ファイルが， 03h 〜 10h クラスタおよび 11h 
クラスタの OAh レコードまでを金域使用し， 
OBh レコードの第 80 h バイトで終わっている 
とすると， 
a = 0 Cn 
b = 0 Bn 
c =81h 

となりますから，ファイルのサイズとして 
CB81 h を書き込むことになります。 

以上が基本的なファイルコンバートの方 
法ですが，うまくやるとひとつのファイル 
で HuBASIC でも S-OS でも贫とめるように 
することも可能です。 （華門真人〉 


質問にお答えします 

日ごろ疑問に思っていること，どんなこ 
とでも結構です。どんどんお便りください。 
難問，奇問，編集室が総力を上げてお答え 
いたします。ただし，お寄せいただいてい 
るものの中には，マニュアルを読めばすぐ 
に回答が得られるようなものも多々ありま 
す。最低限，マニュアルは熟読しておきま 
しょう。質問はなるべく具体的に機種名， 
システム構成，必要なら図も入れてこと細 
かに害いてください。また，返信用切手同封 
の質問令よく受けますが，原則として，質 
問には本誌上でお答えすることになってい 
ますのでご了承ください。なお，質問の内 
容について，直接問い合わせることもあり 
ますので，電話番号も明記してくださいね。 
宛先：〒102東京都千代田区 

九段南 2-3-26 井関ビル 
㈱日本ソフトバンク出版部 
「0h ! X質問箱」係 
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このインデックスは，タイトル，注記— 
筆者名，誌名，月号，ページで構成されて 
います。ここでもすっかり X 68000 のパート 
が増えました。 
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新刊書案内 



この本を簡単に 言って しまえば「心理学者によ 
って窨かれた，オフ イスに おけるコンピュータを 
取り巻く心理」の本です c コンピュータを直接取 
リ扱う人々は，なんでも数字に置き換えたがる傾 
向があるが，実際の経営の意志決定のための要素 
は数字では置き換えることができないことが多く， 
むしろ置き換えると，逆に弊害を引き起こす可能 
性がある（数字だけによる管理は，組織を自滅さ 
せることができる）とか，オペレータと エンド ユ 
—ザーは，視点がまったく違うのですれ違いを起 
こすことが多いなど，コンピュータを前にしたと 
きの人間について害かれて いるので す（コンピュ 


一夕犯罪に関する考察もあります）。個々の内容は 
それなりに価値があるのですが，翻訳のせいなの 
か，もともとこういう本なのか，全体としてはか 
なり読みづらい文章です。少なくとも良い翻訳と 
は言えないでしょう。が，このたぐいの本はまだ 
数が少なく，また，最近はコンピュータが広く使 
われるようになったことで，ますます大きなテー 
マとなりつつあります。我憤しても読む価値があ 
る本なのかもしれません。 （た） 

コンピュータユーザ心理学 B •サンダース著 
菊池豊彦訳マグロウヒルブック刊 
B 6 判144ページ1,900円 003(542)8821 
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Xl/Xlturbo/Z 

XI シリーズ 

► EX-MONITOR VI .0 

XI 用高機能，高速マシン語モニタ。ヘルプメッセージ 
も出る。——謁宮守 一， I / O , 6月号. 204-207 pp . 

►誌上 RPG サンダーロード 
テキスト RPG 第3章.勇者のヨロイ。——グループ. 
クラムボン， POPCGM , 6月号， 240-249 pp . 

► NEBA ACT II 

迫りくるインベーダーを倒し，全30面クリアを目指す。 
——西嶋茂， P 0 PC 0 M , 6月号， 252-258 pp . 

►誌上公開質問状シャープ（ XI ) 

XI につなげられるフロッピーディスクや拡張 I / O ポッ 
クス，ディスブレイなどについてのごく簡単な解答。—— 
多田太郎，マイコン BASIC Magazine , 6月号， 73-74 pp . 

► ZILLION 

横 スクロールシュー テ ィング ゲーム。丄 J.ZILLION 
で敵を擎破せよ。—— A . 岩ちゃき，マイコン，6月号， 
227-284 pp . 

► THE へのへのもへじ 

鉛筆君を動かして，へのへのもへじを画面に作るとい 
う。パズルゲーム。——下中順司，マイコン BASIC 
Magazine , 6月号，194- 195 pp . 

► TACO-SUBMARINE 

シューティングゲーム。 T 国の潜水®の乗組貝となっ 
て，〇国の航空部隊を全滅させよう。——えばちょう， 
マイコン BASIC Magazine , 6月号， 196-198 pp . 

XI turbo シリーズ 

► XI turbo II に 6 MHz 夕ーポチャージャーを！ 

turbo II の基板のパターンカットなどを行い ， turbo II 
のクロックを 6 MHz にアップさせる。——今•雪宽， I / O , 
6月号，123- 126 pp . 

►なんでも Q & A XI / XIturbo / X 6800〇シリーズ編 
XlturboZ II (New Z - BASIC ) でのク□マキー合成につい 
て。 BASIC でのサンブルプログラム付き。——シャープ, 
マイコン，6月号， 440-44 Ipp . 

X68000 

► メディア*エディタ 68 K 

X 68000 の 5”2 HD 用モニタ，エディットプログラム。—— 
KENYA , I / O , 6月号，195- 199 pp . 

► TIMER - D を使ったシステムダウンプログラム 
タイマ割り込み D を使い，一定時問後にシステムダウ 

ンさせる迷惑なブログラム。タイマの使い方の参考には 
なるが。——高橋純， I / O , 6月号， 254-256 pp . 

► ASCII EXPRESS C & B , パソコン.ビデオ対応の X 68000 


用ソフトを発売 

パソコンに接続可能な S - VHS ビデオ 「Com • Vi j と 
X 68000 を使用して CG アニメの合成などができる 「Hyper 
UD ConvVi リンク」について。——網集部， ASCII , 6月 
号， I 72 p . 

► ASCII EXPRESS イーストが X 68000 用の日本語ワー 
ブロソフトを発売 

X 68000 用ワープロソフト 「 EWj について。-^編集 
部， ASCII , 6月号， I 73 p . 

►失敗しないハードディスク選びハードディスク製品 

—K 

主に98用に発売されているハードディスクの紹介だが, 
X 68000 に使う場合の注意も簡単に述べている。——編集 
部， ASCII , 6月号， I 99 p . 

► X 68000 WORKSHOP 

日本語ワードプロセッサ EW を紹介。カナ漢字サブル 
ーチンの特徴についても述べられている。——編集部， 
ASCII , 6月号， 277-278 pp . 

► X 68000 WORKSHOP X 68 K Programmer's Shop 
今回はスプライトを表示するためにビデオコントロー 

ラレジスタや画面モードレジスタなどについて解説0—— 
編集部， ASCII , 6月号， 279-284PP. 

►国内ニュース New ’88 JUNE . X 68000対応 「 Video 工場 j 
シー • アンド.ビーから発売されたビデオ編集システ 
厶 Video 工場についての簡単な紹介。——緬集部，バソコ 
ンワールド，6月号， I 74 p . 

►話題の新機種リポート 

X 68000 ACE , ACE - HD の X 68000 からの変更点をソフト， 
ハードの両面から紹介。——編集部， P 0 PC 0 M , 6月号, 
154-156 叩. 

► X 68000 マシン語入門 

「必須」命令のしめくくりとして， tst , neg , clr , lea , 
trap 命令などについて解脱している。——高橋雄 一， マイ 
コン，6月号， 200-208 pp . 

► Micom News X 68000 用ワードプロセッサ EW 
イーストより発売になった X 68000 用ワープロ EW の 

機能，価格についての紹介。一編集部，マイコン，6 
月号， 2 l 4 p . 

► CG ツール使いこなしシリーズ第2回 

Z-sSTAFF PRO -68 K の使いこなしシリーズ第2回。先 
月のペン機能の解説の統き。一紀要介，マイコン，6 
月号， 294-297 pp . 

►なんでも Q&A XI/XI turbo / X 6800〇シリーズ編 
X 68000 の THE 福袋 V 2.0 の内容について。——シャー 
ブ，マイコン，6月号， 440 p . 

►なんでも Q&A XI/XI turbo / X 68000シリーズ編 
X 68000 ACE - HD でハードディスクの設定をしてからゲ 
—ムを立ちあげる方法について。——シャープ，マイコ 
ン，6月号，44 Ip . 


►なんでも Q&A XI/XI turbo/X 6800 〇シリーズ編 
X68000 用ミュージックソフト MUSIC PRO-68K で大き 
な楽譜を入力する方法について。——シャープ，マイコ 
ン， 6 月号， 44lp. 

►誌上公開質問状シャープ 
X68000 に NEC のプリンタを接統する方法 
について解説している。——多田太郎，マイコン 
BASIC Magazine, 6 月号， 74p. 

► BALL BALL 

2人で対戦できる バレーポールゲーム。ジョイスティ 

ックが 2 つ必要。-村崎裕•一 . マイコン BASIC Maga 

zine, 6 月号， l99-200pp. 

► A-JAX “FIGHTING SPIRIT” 

ゲーム ミュージック プログラム。—— Yu-You, マイコ 
ン BASIC Magazine, 6 月号， 206-209pp. 

► A-JAX ••RANKING" 

ゲーム ミュー•ジッ クプログラム。——川野俊充マイ 
コン BASIC Magazine, 6 月号. 21 0-212pp. 

► チヤレンジ！ X68000 

X68000 の新作ゲーム.ドラゴンスピリット， R-TYPE の 
開発状況を紹介。一川野俊充，マイコン BASIC Maga 
zine, 6 月号, 297-298pp. 

► X68000 新聞 

完成間近のサンプリングソフト Sampling PRO-68K を 
紹介。——編集部， LOGIN, 6 月号， 230-23Ipp. 

ボケコン 

► JEWEL THIEF 

名ドロボウになって防犯カメラに見つからないように 
宝石を盗み出すゲーム。——江波戸篇人，マイコン BA 
SIC Magazine, 6 月号， 203p. 

PC-1416G/1417G 

►誌上公開質問状シャープ（ボケ コン） 

PC-I4I7G でオリジナルキャラを表示させる方法とア 

フターサービスの連絡先。 - 0GI, マイコン BASIC 

Magazine, 6 月号， 72-73pp. 

PC-1445/E200 

► CASL 太鼓判第 6 回 

CASL の命令解説 6 回目。今回はスタック操作，コー 
ル.リターンなどのスタック閲係命令について。 4 月 17 
日に実施された第 2 種情報処理技術者試験の CASL に閒 
する問題の一部の解脱もある。 一 塚田洋 一，マイコン , 
6 月号， 402-405pp. 

PC-1501 

► DOG FIGHT 

タイトルからも知れるように，ボケコン版アフター バ 

ーナー （？） のゲーム。-山沢正裕，マイコン BASIC 

Magazine, 6 月号， 204p. 



コンビューターが 世界を 変える 3 
NHK 特集のシリーズ第3巻は， 「明日の コンビ 
ューターに何を求めるのか」と銘打って，現在の 
先端技術がどんなふうに世界中で利用されている 
のかを紹介する。米国防総省と NASA が開発に取 
りくんでいる超々音速機ニュー.オリエント•エ 
キスプレスや.フランスで普及中のネットワーク， 
ミニ テルなどを始め，明るい未来がたくさん描か 
れている。クレイ2や最新銳戦闘機の写真が少々 
情けないのが残念だ。 

NHK 取材班 編 角川 害店刊 

A5 判 234ページ 1,600円 003(238)8521 


90年代《 R £ 
15の K 視点 


90年代を読む15の新視点 
本書は，目前に迫った1990年代を，都市と社会， 
産業とテクノロジー，そして国際関係などの視点 
'^ 9 ^ から予測しようと試みている。4人の著者はいず 
Km れも三菱総合研究所のメンバーだ。都市構造に閲 
する論議を始め，パイオテクノロジ-,大企業時 
| I | ； I I j p i；j | i 代からの変化，世界経済の見通しなどについて語 


られている。が，惜しいことに「1990年代のコニ 
ピュータ」については触れられていない。 

佐藤公久新井義男岡本勲尾原重男共著 
PHP 研究所刊 

A5 判 254ページ1,300円 003(239)6221 
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7 与号 

特集グラフィックの環境を考える 

MZ - 2500とサポート/ビジュアルマシンとしての XI 
THE SOFTOUCH キングス•ナイト•スペシャル 
魔界復活/5国志/新作情報他 
X68000 あなたの知らない世界内部サブルーチン IOCS 
• MZ -286 I の MS - DOS とエミ ュレー シヨンソフト 
參 MZ -1 500用投稿ゲーム Jocose John part 2 
全機種共通システムアドベンチャーゲーム作成 
ツール STORY MASTER 


1月号 

特集 MZ&X 拡張ボードの活用 

すべての道は I / O に通じる/ MZ で XI 用ポードを使う 
1987年度 GAME OF THE YEAR ノミネート発表 

• MZ - 2500用 ALGO SPACE BLUSTER SG 

• LIVE in ’88 ドラゴンスピリット/悲しきチェイサー 
BASIC リレー連載半熟 FORTRAN はいかが 
X 68000 BASIC 入門グラフィック炎上 

マシン語体操い2.3データ構造を考えよう 
全機種共通システム Fuzzy BASIC コンパイラ奥村版 




9 月号 

特集1 MZ -700 に不可能はない 

MZ -700 ゲームテクニック集/ SPACE BLUSTER SG 
特集2ミュージックデータと遊ぶ FM 音源の世界 
MZ - 2500 MM しの拡張/ X 1/ turbo 用 MML コンパータ 
X 68000 あなたの知らない世界 マシン語入カツール 
BASIC リレー連載 ディレクトリまるごとコピー 

• XlturboZ , X 68000 用ハードコビープログラム 
全機種共通システム 卩〇80/88版5-05“5\/\/(^0” 

リロケータブル逆アセンブラ Inside-R 

10 月号 

特集 Game Design を考える 

遊びを設計するために/ビコビコゲー厶が原点他 
參投稿ゲーム4選 

•ミユージックブログラムベートーベン月光 
THE SOFTOUCH SPECIAL イース/ウルテイマ IV 
X 68000 あなたの知らない世界 BASICtoC コンバータ 
X 68000 BASIC 入門追擎 ランダムファイル 
全機種共通システム FuzzyBASIC コンパイラ拡張版 
XI turbo 版 S -0 S “ SW 0 RD”/tiny CORE WARS 

11月号 

特集1全機種共通システム S - OS 再考 

超入門 S -0 S / ファイルアロケータ&ローダ 
FuzzyBASIC コンパイラ版 BACK GAMMON 
特集2 MZ - 2500スペシャル逆襲のアルゴ機能 
アルゴブロック崩し/アルゴリズムを作ろう 

• MZ -2&00 力ードゲーム KING’S COURT 

THE SOFTOUCH X 68000 用 Kamikaze / MZ -286 l 用 
up シリーズ / トリフォニー / リバイバー他 

X 68000 あなたの知らない世界 CP / M -68 K / TITLE . SYS 

□ h!X IS 月 号 

特集正真正銘の Oh ! CZ SPECIAL 
新製品速報 XI turboZ II /XI twin / X 68000 
X 1/ turbo システム&ブログラミング 
NEW Z - BASIC/C compiler PRO -68 K 
人類タコ科図鑑第 1 回 Jap meets Yankee 
実用 （ ？ ） オブジェクト指向のゲームプログラミング第1回 

• X 〗/ turbo 用力ードゲーム SPEED 
_ X 68000 ファイルコンバータ MACS/HELPS 

全機種共通システム PAS 0 PIA 7 版 S -0 S “ SW 0 RD ” 他 


fimmi 






3月号 

特集コンピュータサウンド“楽”入門 
XI /turbo MIDI インタフェイスの製作 
MZ - 2500 Super Keyboard / VIP サウンドデータ公開 
Oh!X LIVE SPECIAL 組曲 「 Ysj/Raspberry Dream 他 
THE SOFTOUCH Might and Magic/HyperUD 
オブジェクト指向のゲームプログラミング 
X 68000 BASIC 入門奇襲アニメ作戦 
X 68000 あなたの知らない世界未公開 I 0 CS の解析 
全機種共通システム構造型コンパイラ言語 SLANG 

4月号 

特集不思議の国のゲーム学 

決定！ 1987 年度 GAME OF THE YEAR 

ピコビコゲーム春場所 / GAME REVIEW 10本他 
新製品 X 68000 ACE HD / カラースキャナ CZ 8 NSI 
X 68000 あなたの知らない世界 microEMACS の移植 
參 MZ 700 SPACE BLUSTER FX 

• LIVE in ’88 Moonlight Serenade/Long Night 他 
全機種共通システムデバッギングツール TRADE 

シミ ュレー シヨン ウォーゲーム WALRUS 

5月号 

特集 BASIC 入門「再検証 j 

BASIC の歴史と意義/栄光の HuBASIC 
黄金の BASIC 入門プログラム/ブログラミング用語集 
ミュージックプログラマへの道/レイトレーシング 
特別企画言わせてくれなくちゃだワ 
• 新製品 X 68000 ACE / ACE-HD 

• LIVE in ( 88 GET WILD/BOOM BOOM/SDI 

• SHORT ACCESS 3 D ポクシングマシン語データ文生成 
全機種共通システムシューティングゲーム ELFES 

6月号創刊6周年記念 

特集システム環境を考える 

8ビットパソコンの開発環境/ Human 68 k のシステ 
ム環境/システムを読むためのアセンブラ入門 
特別企画究極の8ビットパソコン 8 R 0 N 計画 
THE SOFTOUCH X 68000 用日本語ワープロ EW 他 
籲付録「あぶない福袋」 

マシン語体操 1.2. 3番外摄 Lisp 80 入門 
X 68000 BASIC 入門捨て身のミュージック 
全機種共通システム構造化言語 SLANG 入門他 


日月尹 

特集迷宮の日本語処理環境 

MZ - 2500用ワープロプログラム Super ものかきくん 
窨式ユーテイリテイ C 0 LN / らくらく SYMBOL 他 
試験に出る XI 最終回通信ブログラムである 
X 68000 BASIC 入門第1回めぐりあい X-BASIC 
參 Xl / turbo 用パズルゲーム STAR PANIC 
• Z'sSTAFF PRO 68 K の世界 
X 68000 あなたの知らない世界 SOUND PRO 68 K 他 
全機種共通システム FM -7/77 版 S -0 S “ SW 0 RD ” 他 



P 月号 

特集グラフィック画像の冒険 

XI / turboCG アニメ/トリフォニーで立体モデル 
X 68000 グラフィックデータ / QUICK MZ PAINT 他 
X 68000 あなたの知らない世界辞害構造 WORD POWER 
マシン語体操 1.2.3 Lisp インタプリタ （1) 

• NEW Z - BASIC 詳報その名は Z-BASIC 

• LIVE in '88 グラディウス2 

• SHORT ACCESS THRILLING / POM カードボーカー 
全機種共通システムシューティングゲーム ELFES 


バックナンバー案内 


ここには1987年7月号から1988年6月号までをご紹 
介しました。現在，1987年2, 3,4, 5,7,8, 9, 10, II , 12, 
1988年 I , 2, 3, 4, 5, 6までの在庫がございます.，パッ 
クナンバーおよび定期購読のお申し込み方法につい 
ては，本文168ページを参照してください。 
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NEW PRODUCTS 


A 4 サイズのノー トワープロ 

WV -500 

シャープ 



WV -500 とオプシヨン類 


シャープがノー トワ ー プロと名づけて7 
月1 n から発売する WV -500 は， A 4 サイズで 
厚^.39 .5 刪， 重量は電池含め1.6 kg という小 
型•軽： i ： のプリンタ分離タイプ。本体は138,000 
円，別売の熱転写プリンタ WV -01 TP は39, 
000円 。 

辞書は固有名詞を含め約10万語，ューザ 
一辞書として最大110件が登録できる。計算 
機能，グラフ作成機能，スケジュール管理 
機能，そして自動ソート/データ検索もでき 
る住所管理機能などがある。また， 1 C カー 
ド用スロットを2つ内藏しており，メモリカ 
-ド （32 K バイトは8,000円， 64 K バイトは 
12,0001»|)に文書登録できるほか，ゴジッ 
ク体印字用カード （10, 000円)もあり，8月 
には L 海や麻雀などのゲームカードも発売 
の予定。また，零子手帳 PA - 7000の電話帳 ノ 
住所録カードも同様に使える。 

オプシヨンとして， 3.5 インチ FDD WV - 
10 FD (40 ，000円）が接続でき，書院シリー 
ズと文, 1 }•の互換性が確保されるほか，パソ 
コン通信のできる通信セットなども今後発 
売される。 

液晶デイスプレイはガイダンスラインを 
含め40文字 X 22 行が表示できる。 

〈問い合わせ先〉 

シャープ ㈱ 006(621)1221， 03(260)1161 


3インチ液晶カラーテレビ 

3 E - J 1 

シャープ 



240 X 384 画素を3インチ画面に持つポヶ 
ットテレビ 3 E - JK 57, 800円 ） がシャープよ 
り発売された。 

12 メモリつきオートチューニングで VHF ， 
UHF 合わせて12局を登録でき，メモリ局と 
異なるものはサーチ選局で探し出せる。 

また，チャンネル番号や電池交換時期の 
知らせなどが画面に表示される。 

ビデオ入力端户つき。本体重董350 g 。 
〈問い合わせ先〉 

シャープ ㈱ 006(621)1221,03(260)1161 

電子手帳用 1 C カード 

シティガイド東京編 PA -7 C 8 

シャーブ 


人気の電子手帳 PA - 7000用の 1 C カードと 
して，シティガイド東京編カード PA -7 C 8 
(7,000 PJ ) が 6 月1日に発売された。 

収録内容は，レストランやバー，デイス 
コ，百貨店/専門店，ホテル，名所など926 
件の首都スポット情報。また，エリア別な 
どの条件検索機能や最寄り駅などのデータ 
も装備している。 



PA - 7000用 1 C カードはほかにも多数ある 
ので詳しくは下記へ。 

く問い合わせ先〉 

シャープ ㈱ 006(621) 1221，03 (260) 1161 


コンパクトファクシミリ 

FO -420 

シャープ 

シャープは，5 月 30 日にコンパクト フアク 
シミリ FO -420(298, 000 円）を発売した。原 
稿は A 4 サイズで10枚まで自動連続送信でき 
る。ワンタッチダイヤル20局，短縮ダイヤ 
ル 50 局を装備し，相手が通信中のときは， 
再ダイヤルのほかに，別に登録してあるフ 
ァクシミリへ転送することもできる。また， 
料金の安い深夜/休日に送受信するようにセ 
ットすることも可能。 

く問い合わせ先〉 

シャープ ㈱ S 0 B (621)1221,03 (260) 1161 


FO -420 



LISP 内蔵ボケコン 

AH 000 

カシオ計算機 


カシオ計算機が6月27日から発売するボケ 
ットコンピュータ AI -1000 は ， COMMON 
LISP の文法を参#にして厳選された LISP 
を搭載したもので価格は39,800 R 。 

32 K バイトの RAM を持ち， フアンクシヨ 
ンキ ー4 つ，32桁 X 4 行表示の液晶ディスプ 
レイを装備。数式記憶，フアイル管理はも 
ちろん，電話番号などを記録するデータバ 
ンク機 ft 这もある。 

オフ。シヨンと し て BASIC ， C ， PROLOG , 
CASL などの ROM カード（各11,000円）や， 
ペンギン 情報 コーナー 159 








増設用 32 K バイト RAM (15 ,000円）， 3.5 イ 
ンチ卩00(49,800円），113-232(：とセントロ 
ニクス準拠のインタフェイスを内蔵したイ 
ンタフェイスボックス （16, 500円）などが用 
意されている。 

く問い合わせ先〉 

カシオ計？?:機 ㈱ 003 (347)4811 



インテリジェントモデム 

MD 2400 B /1200 AII 

立石電機 

立石范機は，全二重 • 2400 bps の MD 2400 
B (49,800円）と全二重 •1200 bps の MD 1200 A 
II (24, 800円）という2機種のモデムを6月 
6日から発売した。 


MD 240 0 B は， M 信エラー検出 • 再送方式 
である MNP を搭載し，さらに フローコード 
最適選択機能によりコードの況乱によるエ 
ラー発生を最低に抑えたというもの。 

なお，同時に1200 bps の MD 1200 A II も発売 
される。制御コマンドは，両機種ともヘイズ 
AT ぉよび CCITT V .25 bis 準拠。 

く問い合わせ先〉 

立石電機 ㈱ S 03 (436) 7233 

MD 2400 B 



カラーイメージスキャナ 

GT - 4000 

セイコーエプソン 

セイコー エプソンは， パソコン 用 カラー 
イメージスキャナ GT - 3000の上位機として， 


新たに GT - 4000 を 5 月下旬から発売開始した。 
価格は 198,000 円。 

GT - 4000 は， 1 回のスキャンで A 4 サイズ 
のフルカラー画像を入力する線順次走査を 
卿し，読み取り時間は約 90 秒。読み取り 
闺素あたり最大8ビットで入力するので，れ 
色最大 256 階調で 1 千 6 百万色の表現ができる。 
拡大 • 縮小率は 50% 〜 200% までを 1% きざ 
みで設定可能。 

なお， GT - 3000 /3000 V をサボートしてい 
るソフトで作成したデータなどはそのまま 
使用できる。 

く問い合わせ先〉 

セイコーェプソン ㈱ 30266(52)3131 


GT - 4000 



XVciain 


TRON でいっぱい _ 

5月中旬に東京•平和島で恒例のマイコン 
ショウが開催された。昨年までとはうって 
変わって，パソコンの出品が少なかったの 
には少々失望したが，その代わりにあの TR 
ON が実にさまざまな形で展示されていた。 
列記してみると， 

• TRON チップ 5 「 G マイクロ/200」および周 
辺 LSI :日立，富士通，三菱電機 

• TRON チップのパネル説明：松下 

• ITR 0 N ••マイクロニクス 

• CTRON 試作版：沖電気，東芝 

• CTRON 搭敕ミニコン：沖電気 

• BTRON 試作機：松下 

といった具合。これだけ TRON 関係の製品 
が展示されたのは，もちろん初めてのこと 
だ。さらに有料で TRON 計画のリーダーで 
ある東大助教授 • 坂村健氏の講演まであっ 
た。これも盛況だったそうだ。 

この背景には， TRON 計画の推進団体， 
TRON 協会の母体である日本電子工業振興 
協会がマイ.コンショウの主催団体であるこ 
とが大きいとは思う力、ここではまず並べ 
る製品が揃ってきたことを客観的に評価し 
160 Oh! X 1988.7. 


たい。とくに日立，富士通， 三菱の 3社が共同 
開発していた32ビット TRON チップ 「 G マ 
イクロ/200」が一般に初公開されたことは 
BTRON などと違って大きな意味がある。な 
にしろ， TRON のオリジナルな命令セット 
を持つ初めての品だからだ。 

TRON チップが出回り，それを使ったパ 
ソコンが製品化され，ここで OS として BTR 
ON CITRON が走り出すにはまだしばらく 
は時間がかかりそうだが，そろそろ TRON 
コンピュータの輪郭が見えてきたといって 
いいのかもしれ ない。 

4 M ビットメモリが離陸 

これもマイコンショウからの話題。マイ 
コンではなく，メモリチップも今回のマイ 
コンショゥでは話題を集めた。 一部で 予想 
されていたことだが， 4 M ビットの DRAM の 
試作品が公開され た。 展示したのは東芝， 
三菱 電機，日立製作所の3社。富士通と松下 
もスペックを パネル 展示した 0 

詳しいスペックはここでは省かせていた 
だくが，おおむね各社の公表データは同じ 
で，プロセスルールは 1 M チップより20%細 
い0.8//ルール。アクセス速度は100ナノ秒前, 


後。チップサイズは1メガや256キ ロ チ ッフ。 
と同じ。 

4 M 時代が固前であるとは昨年からいわれ 
てきた。しかしこうやって，実際に目の前 
に試作品を置かれると，いよいよか，とい 
う感じが実感としてわいてくる。 

実はこの 4 MDRAM ， 単純にメモリは大き 
いほうが いい，といった 問題ではなく，深 
刻な需要がすでにある。新しいパソコン用 
OS である OS /2 がその引き金なのだ。 OS /2 
を使う場合，メインメモリは最低でも3 〜 4 M 
バイト必要であることは以前説明したと思 
う。たとえば 4 M バイトを装備するとしよう。 
こうなると， 256 K ビットのダイナミック R 
AM ( DRAM ) の場合，実に128個が必要にな 
る。こうなるとメモリボードだけでパソコ 
ンの本体の中が いっぱい になってしまいそ 
うなので，事実上，使用に耐えない。だか 
ら iii 低でも 1 M ビットの DRAM が必要となる 
わけだ。しかし 1 M ビット DRAM でも32個必 
要だ。これでもかなりのスペースを食って 
しまう。その点， 4 M ビットの DRAM があれ 
ば8個ですむから理想的だ。 

さて マイコン シヨウが終わって， 4 M ビッ 
卜の DRAM がいつから商品化されるかを気 















インテリジェントリモコン 

R -65 

ビッグサンズ 



R -65 


AV 機器用のインテリジェントリモコンの 
新製品 R -65 (12,500円）がビッグサンズよ 
り6月1日に発売された。キー数は65で，ど 
の キーも登録内容は変更可能。 3 個の LED 
ランプが， 送信/受信/ェラーの 状態を表示 
する。 

単3電池4本使用，サイズは幅200 X 長さ110 
X 厚さ18_。 

く 問い合わせ先〉 

ビッグサンズ ㈱ S 06(311) 0077 


にしていたところ，5月下旬になって，新聞 
に続々と 〆 1 M ビットの DRAM の試作品が提 
供され出したというニュースが載り始めた。 
いろいろ記事が出たのだが，総合すると5 
月までに試作品を出荷したのが日立製作所， 
富士通，三菱電機の3社。6月には東芝が 
出し，7月には日本電気が続く，という。 
また松下やテキサス•インスツルメンツ社 
も計画中とか。 

記事によれば，試作品ではなくて本当の 
製品が販売されるようになるのは来年後半 
以降だろうという。そのスケジュールから 
考えれば，パソコンで気軽に使われるよう 
になるには早くても2与^ということになろ 
う。2年後になれば， OS /2 のアプリケーショ 
ンソフトも出揃っているだろうから，ちよ 
うど都介がいい。2年後。 PC -9801 はその 
ときでも独山•状態にあるのだろうか？ と 
にかく 4 M チップ時代に向かってテイクオフ 
した。 

AX マシンが動き出す 

5月はにぎやかだった。マイコンショウの 
翌週，今度は東京 • 晴海でこれまた恒例の 
ビジネスショウが開催された。 


INFORMATION 


今夜も朝まで POWERFUL まあじゃん 

ギヤルコンテスト 

デービー ソフト 

ギヤルコンテストで好きな女の子を選ん 
でプレゼントをもらおう〇「今夜も朝まで P 
0 WERFUL まあじゃん」のェキサイト麻雀 
モードで登場する7人の女の子かふ，一番気 
に入った子を選んで，パソコンショップ備 
え付けのハガキ（官製ハガキも 4) に記入 
し，下の宛先に送付する。1位になった彼女 
に投票した人の中から,抽選で500名に彼女 
のオリジナルデータデイスタをプレゼント 
(ただしこれは「今夜も朝まで POWERFU 
L まあじゃん」のディスクがないと使えな 
い）。応募の際は，住所•氏名•年齢 • 希望 
の機種メディアを明記すること。宛先は， 
〒〇60北海道札幌市中央区北1条西7丁目 
住友海上札幌ビルデービーソフト株式会社 
応募期間は6月末日まで。 


こちらは マイコン ショウとは 違って， 現 
在販売中の商品と近く発売されそうな製品 
のオンパレード。チップではなく完成品ば 
かりだ 0 

4日間で実に46万6千人もが詰めかけたそ 
うで，混雑を極めていたが，見どころは夕 
ップリあった。最新型ワークステーション， 
ラップトップパソコン，パソコン新製品， 
ワープロ。 ISDN ， パソコン通信， LAN 。 オフ 
イス家具。電子文具。果てはシステム手帳 
ブームに 乗って，文房具 コーナー もなかな 
か人気の的。デモンストレーションにも力 
が入っていた。 

どれひとつを取りあげても20行以上コメ 
ントを書けるのだが，ここでは一番注目を 
浴びていたうちのひとつについて紹介しよ 
ラ。 

パソコン 新製品 ではつ いに話題の AX マ 
シンが大挙して姿を見せた。すでに販売活 
動に乗り出している三洋電機とシャープ， 
三菱の3社が，これから発売する AX パソコ 
ンを一斉に公開したのだ。三洋は卓上型に 
加えてラップトップも用意。三菱はラップ 
トップとその改造機の疑似卓上機を出品。 

そしてシャープは80386を CPU に使い，さら 


く問い合わせ先〉 

デービーソフト ㈱ 0011(251)7462 

BOOK 


X 68000 ガイドブック 
ビジネス•ア スキー 

X 68000 活用本の類の最新刊。「生いたち j 
や商品コンセプトなどのプロフイールに始 
まって， システムキ與成 ，標準ソフトなどを 
マニュアルに 即して解説している。 

『 X 68000 ガイドブック』佐藤日出男蕾 
B 5 判，295ページ，2,800円 
く問い合わせ先〉 

㈱ ビジネス•アスキー S 03(486)7119 



X 68000 


4メガのいる風景 1988-07 

に GSP を装備して高速画像処理を实视した 
超豪華マシンを投入した。三洋はすでに阪 
売している80286の卓上機だけでなく，32ビ 
ット高速機とラップトップ機も追加，胰ポ 
した。 

いよいよ AX が姿を現した。会場でも目立 
って人気を集めていた。 

「もう PS /2 が定着したから AX なんて……」 
という声もチラホラと出ている力 ? ，実際に 
はそんなことはない。米国では IBM - PC/A 
T 互換機が売れ行きアップを示しており， 
tl 本でも AT 互換機である東芝の J - 3100が依 
然として好調だ。 AT 互換機市場はまだまだ 
健在である，といえよう。そんなおりに轉 
星のようにデビューした AX マシン。 そこそ 
こは行けそうだ。今後の各社製品の売れ行 
きに ついては， 後日このコーナーで報告し 
よぅ。 

なお， シャーフ。の AX パソコンは， 通称 「 A 

X 386 j と命名されたが，型番は 「 MZ - 8702 
/6」という。シャープは MZ という名前に特 
別な価値や重い歴史を感じられなくなった 
ようだ。 MZ の歴史にピリオドを打った城示 
会だったのかもしれない。そう思うのは短 
盧にすぎるだろうか。 ( K . T .) 
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— FROM READERS TO THE EDITOR— 

すっかり初夏の気候となり，そろそろ南 定を立てているんでしょうか 0 そのよう 


さて，これからはなにを害いて出しましょうか。 
それと，ようやく私の手持ちの各システムにお 
ける交流が図れる環境が整いました（といって 
も 80 B だけは一方通行ですが）。 



のほうから海開きの話題などが 聞 こえて 
きそうです。皆さんはこの 夏， どんな予 


♦ 5月号の「 BASIC 特集 j はたいへんよかったで 
す。それに「言わせてくれなくちやだワ j も， 
読むのはキツかったけど面白かったです。なか 
でも最も驚いたのは85ページの機種別保有者数 
で， X 68000 ユーザーがこんなに多かったことに 
はたいへんうらやましく思えました。 

燈田安幸 （15) 大阪府 
♦「 BASIC 特集 j で HuBASIC がほめられていたが， 
いいところばかり書いてあるのは問題だと思う。 
XI の売れ行きが伸び悩んだのは，私はあのペイ 
ン ト ルーチン=ハ ド ソンの せいだと思っている。 

山本正幸 （18) 神奈川県 
山本君のいうようにいろいろと不満はあっ 
たかもしれないけど，あのころの HuBASIC 
って，結構いい線いってたと思うんですけ 
どね。でも5月号の特集を読んで，多くの 
方から 「 BASIC を見直すきっかけを得た」 
といった内容のご意見をたくさんいただい 
て，編集室でも嬉んでいます。 

は去年の9月号から Oh ! X (Oh ! MZ ) を読 
み始めたので，「言わせてくれなくちやだワ」は 
今回が丨回目でした。読んだあとの感想は「読 
者パワーを思い知らされたっ！ j のひと言に尽 
きます。それにしても凄いですねえ一。 

北野卓哉 （15) 大阪府 
♦もしかして5月号96ページ左下の「鳥居勉さ 
ん」は，栃木県ということからしても“ X ファミ 
リーの生みの親”である，シャープ電子機器 事業 
部長の 烏 居さんではないだろうか。第丨回の祝 
一平氏といい ， Oh ! X はとんでもない隠れキャ 
ラを用意するのが好きですね。 

田中義彦 （24) 東京都 
♦お詫びするのである。まさか私のしよ一もな 
いメッセージが，第3回「言わせてくれなくち 
やだワ」に載る （87 ページの最後のあたり）な 
んて夢にも思っていなかったので，ついつい， 
いいかげんな嫁のグチなんぞ窨いてしまったが, 
うちの女房はたいへんよくできた嫁である。よ 
って5月号の私のハガキには，一部“ウソ”があ 
ったことをここに深くお詫びするのである（頭 


な話も，機会があればぜひ聞かせていた 
だきたいですね。 


ペコー)。 田中伸和 （30) 大阪府 

これはもう，ハガキの一部にウソを書いて 
しまったぉ詫びというより，田中さんから 
奥様への体面繕いと見えますが，いかがな 
ものでしようか。 

♦ 5 月号86ページの伏軎さんの上の CG を見て 
なにか思い出しませんか。そ一です，あの有名 
なデービーソフトの「南太平洋アドベンチヤー」 
です。あのゲームこそこの私が初めて買ったゲ 
ームソフトだったのです。あのゲームって，怪 
物にいきなり挨拶するとか，オールで戦うとか 


ここまでひとりで仕上げるのにはちょっと時間 
がかかりましたが，これもすぺて Oh ! X (0 h ! MZ ) 
のおかげです。 棚瀬小三郎 （61) 北海道 

いえいえ，これらのシステム環境を作られ 
たのはひとえに棚瀬さんの努力の賜でしょ 
う。これからもその環境を生かしてがんば 
ってください。 

♦わ，悪かった。吉田幸一さんがそこまで考え 
ているとは思わなかった。僕は丨〜7巻までの 
半分しか読んでいなかったので，そこまで意見 
はできない。でも，結局は人それぞれなんです 
よね。 塚田弘 （18) 栃木県 

♦ X 68000 ACE - HD では，またまた新しいカスタ 
ム 1 C を作りまくったようですね。それでもって 


まったくむちゃくちゃなものでした。はっきり 
いってアタッチなんぞよリも超卑劣なものであ 
ったといまでも確信しています。う•一ん，懐か 
しい。でもやっぱりアイスクリームは雪印のパ 
ナモです。 稲野辺弘 （17) 神奈川県 

たくさん届いた5月号のハガキのなかに， 
「雪印のパナモは美味しい」と普いてきた人 
力 ? 稲野辺君のほかに3名ほどいたのですが， 
いったい“パナモ”なるアイスクリームの 
どこがウケているんでしようね。 

♦ 「言わせて〜」の「私が主役だあ」のトリに 載 
せていただきどうもありがとう。掲載されるの 
を狙ってハガキを出したのはあれが初めてです。 


その名前が“メシア”だって？ いったいブッ 
夕はどこへ行ってしまったんでしょう かね。や 
はり仏様より救世主のほうが凄いんでしょうか 
ね。もし，今度また新しい 1 C を作るようなこと 
があったら名前はもう••ジーザス • クライス ト" 
しかないんじやないでしょうか。そうそう，つ 
いでに漢字 ROM & IOCS には“金田一春彦••と 
か，スプライトコントローラには"ピカソ"な 
んていうのもいいんじやないでしようか。つい 
でに数値演算プロセッサボードには“広中平祐" 
とかにしちやいましよ。最後に初代 X 68000 用20 
M バイ ト HD は"アンドレ•ザ•ジャイアン ト，， 
なんて呼ぶようになったら，世の中楽しいでし 



S 鐵口娜。 

淡、 ダレぶ商ぃぞ。 



▲九藤!气气(ツぅで ? ,1 ! 1 思 
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ょうね。 岡部玄 （22) 長野県 

スプライトコントローラには“山形導博”， 
数値演算プロセッサには“玲於奈”なんて 
いうのもいいかもね。 

♦こんなに街の緑が鮮やかなのに，僕の心のな 
かは真冬になってしまいました。あまりに突然 
だったから，どうすることもできなくて……。い 
ままでずっと一緒だったから気づかなかったけ 
ど，たぶん僕も甘えていたんだと思います。こ 
ればかりは誰を貴めることもできないし，誰も 
悪くはないんです。きっとそうに決まっていま 
す。少し時間はかかるかもしれないけど，また， 
あのときみたいに2人で海を見に行けたら嬉し 
いなって，ただそれだけです。"いつだってひと 
りより2人のほうがいい”，ほんとうにあの歌の 
とおりだと思います。だから……。あれっ，こ 
れどこ行きのハガキでしたっけ。 

井上武司 （18) 神奈川県 
このテのハガキはタイムスリップでもして， 
レモンちゃんのセイヤング，またはアンコ 
ウさんのオールナイト，ナマズのおばさん 
の走れ歌謡曲，またはナッチャコパック（テ 
ーマによっては可）にでも送ってみれば， 
きっと番組の最後のほうで読んでもらえる 
はずです。あっ，失礼，井上さんはまだ生 
まれてなかったのかな，あのころって。 
♦最近，パソコンのことをバカにしていた妻が， 
「スーパーレイドック」をやり始めてから病みつ 
きになってしまい，9力月の娘を私に押し付け 
て，毎日，毎日パソコンの前に座りきリになっ 
ている。私がパソコンにさわっている時間がな 
くなってしまった。いったい，どうしてくれる 
んだ。 深沢芳明 （30) 神奈川県 

♦あと I 週間で「ソーサリアン j である。日本 
全国「ソーサリアン」である。編集室にサンプ 
ル版はあるのか「ソーサリアン j である。木屋 
氏を人間国宝にしたい「ソーサリアン j である。 
古今東西「ソーサリアン」である（編集室’;主： 
以下似たようなのが延々と続くので一部省略の 
「ソーサリアン j である）。 ああ， 「ソーサリア 
ン J , 「ソーサリアン」，「ソーサリアン」なので 
ある。 上杉直久 （18) 神奈川県 

いや一，上杉さんのほかにも「ソーサリア 
ン発売」のニュースに関してはずいぶんと 
ご意見をいただきました。 turbo 専用なの 
が悔いが残りますが，仕上がりは今月のレ 
ビューでお届けしたとおりの結果です。6 
月24日発売の「イース II 」も期侍大ですね。 
♦突然ですが， X 68000 版レリクスの賁任者は実 
際に尼寺に行ったのでしょうか。もし行ったの 
なら，社名が「ポーズテック j になってたりし 
て。チャンチャン。龍尾謙二 （21) 岐阜県 
♦私の X 68000 は両親の上海専用ゲームマシン 
と化している。毎日20〜30回もやっていて，父 
母ともどもギャーギャーいいながらマウスをク 
リックしています。それでも毎日 I 度はクリア 
する上達ぶりには息子の私もただ感心するばか 
り。また，最近では源平にまで手を出しており， 
バアさんの声に大爆笑しています。 



苗木純生 （21) 大阪府 
► X 68000 の源平討魔伝って凄いですね。しゃべ 
ることしゃべること。僕は後ろに人が隙れてい 
るんじゃないかと思ってしまいました。 

信太徹 （18) 高知県 
ホント，最近のゲームはよくしゃべります 
ね。 XI 版の「ゼリアード j や「ねぎ麻雀 j 
もしゃべりまくっています。でも夜中にひ 
とりでやってると，ちょっと不気味な気も 

しないではないのですが . 。 

♦夢のサツカーやサイエンスロマンキャンぺ一 
ンといった催し物で，快進擊を続けている我ら 
がシャープだが，ここ静岡でもシャープ製品10 
万円以上お買い上げで，もれなく「石川さゆり 
ショウご招待」である。 

竹谷直樹 （19) 静岡県 
夢のサッカーより，もれなく「石川さゆり 
ショウ」 のほう力 f シュールで いいなあ〇こ 
ういうセンス大好きです。 

♦今年めでたく国立大学に入学できて，喜びを 
体いっぱいで感じている今日このごろです。も 
っと嬉しいことにうちの学校の購買部には X 68 
000が置いてあり，学生が好き勝手に使えるので 
す（その隣には PC -98 もあったりする）。やった 
ぁ一，これで X 68000 を買わなくてもスぺハリや 
源平ができる。この学校に受かってほんとによ 
かった。 小松元弘 （18) 静岡県 

こんな話，シャープさんが聞けばきっと泣 
いちゃうだろうな。でも小松君も同じ睁岡 
なんだから，いま X 68000 を買えば「石川さ 
ゆりショウ j ご招侍だよ。 

♦先々月まで私は FM ユーザーだった。しかし, 
友人が Xlturbo からエブソンに乗り換えたのを 
機に，この私も以前から惶れの X 68000 を買って 
しまった。さあ，もうためらうことはありませ 
ん。どんどんソフトを出しなさい。私はいいも 
のはたくさん買う社会人ユーザーだぞ！ 

辻口恭明 （30) 北海道 
ずいぶんと威勢のいい方が仲間に加わって 
いただいて， 頼もしい限りです。それに推 
薦するソフトのところに堂々と「源平討魔 
伝， X 68000 を買ってよかった j と書いてく 
れた辻口さんの性格はもっと好きです。 


►ついにシャープが重い腰を「どっこいしよ」 

と上げたようですね。皆さんはもう気づいてい 
ると思いますが，なんと X 68000 の広告を電車の 
中吊り広告のなかに見つけたのです。あれは見 
る人に大エジブト展を思わせるような，黄金の 
輝きを持った感動を与えます。この広告はいま 
までと違ったシャープの意気込みが感じられて 
とても Good です（マル）。 

石部忠之 （19) 千葉県 
♦いや 一， やっとレイトレーシングの記事が出 
ましたね。なんせ過去4年ほどレイトレーシン 
グの記事があったという記憶がありませんでし 
たからね。ところで，ふと気づいたのですが， 
Oh ! 父には「創刊 〇 周年記念」と「改題 〇 周年 
記念」または 「0 h ! X 独立 〇 周年記念」の2大 
行事があるわけですが，やはり両方ともちゃん 
となにかやるんでしようか。私はこうなった以 
上「言わせてくれなくちゃだワ〇周年記念」と 
「 S -0 S 発足〇周年記念」を追加して Oh ! X 4大 
行事まで発展すると読んでいるのですが。 

宮本康司 （19) 兵庫県 
そうですねえ，釗刊と改題と両方やれば1 
年に2度お祭り騒ぎができていいんでしよ 
うけど， そのうち 「年中お祭りやってるア 
ッハ。 レ マガジン j なんてサブタイト ル 付け 
られそうで怖いなぁ。 

♦あのですね，「プログラムを入力する j とよく 
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いいますが，なぜ「入力」というのでしようか 
ね。「入力」という文字を単純に分析すると，力 
を入れるという意味になるわけで，これでは意 
味不明ですね。誰が最初に「入力 J といったの 
か，誰か知っていたら教えてください。 

荒木光弘 （32) 東京都 
入力というのは 「 INPUT 」 の訳語なんです 
が，英語の INPUT はエネルギーや信号を 
機械に供給するという意味なので，そうな 
っちゃったわけですねえ。 

♦さて，ここでクイズです。次のうちいちばん 
不気味なコンサートはどれでしよう。丨 ） 最後 
に全員で涙を流しながら「ネコの森には帰れな 
い」を合唱する谷山浩子のコンサート。 2) 同 
じく「防人の歌」を合唱するさだまさしのコン 
サート。 3) 同じく「秘密の花園」を合唱する 
聖飢魔 II のコンサート。 

哇地真太郎 （18) 北海道 
はっきりいって，全部不気味です。 

♦山形大学工学部情報処理系に受かった MARO 
君は，ゥキウキしながら下宿生活を始めたが， 
彼を悲しませることがあった。次のうちから最 
も彼が悲しんだと思える番号を選んでください。 

I )民放が2局しかない（彼はアニメファンだ 
った。） 2) 父親に「テレビがほしい」といった 
ら，3インチ白黒テレビを渡された。 3) テレ 
ビに色がついてなかった見返りに CD ラジカセ 
を買わそうとしてショップに行くと，彼のほし 
がっていた品物は3週間しないと入荷しないと 
いわれた。 4) 仕方がないので MZ - 2000を持っ 
て行こうとしたら。ディスプレイとキーボード 
がダメになっていた。 5) これじゃあんまりな 
ので友だちにカシオのボケコンを借りたが，代 
わりにガラカメ34冊を貸すハメになった。 6) 
バイトしてパソコンを買おうとしたら，親に「バ 
イトなんかしないで4年で卒業してくれ」攻擎 
にあった。以上ゲゲポクイズ風にまとめてみま 
した。 佐藤啓之 （20) 山形県 

当然 ， MARO 君って佐藤さんのことなん 
でしよ。それにしてもなんでも親に買って 
もらおうというその根性は凄い。 

♦私の友人が東京の大学に行くことになったが， 
彼は自分の XI turbo やワープロは持って行か 


なかった。そこでもうひとりの友人と私との間 
で形見分けが行われた。協議の結果,私の Xlturbo 
は FM 音源，イメージボード，プリンタが付くこ 
ととなった。やはり「持つべきものは金持ちの 
友人 j である。 黒田信和 （18) 富山県 

この「金持ちの友人」のほかに，「大金持ち」 
や「ガールフレンドが多い」など，まだま 
だたくさんのバリエーションが残されてい 
ますので，がんばって黒田君も友人作りに 
励んでみてください。 

♦アカデミー賞の特徴（長でないところに注 
目），「売れた映画はいい映画」，そして「いい映 
画には5部門以上に授賞させる」である。その 
証拠には今年の「ラストエンペラー」は9部門 
授賞であったが，「アンタッチャブル」がそれよ 
リもっと素唷しい映画であったことも事実であ 
る。考えてみると，「アンタッチャブル」が「ラス 
トエンペラー」に劣っていたところは，興行成 
績を除けばエキストラの人数と製作費くらいで 
はないかと思う。それにしても丨本の映画に9 
部門も授賞させるのはやめてほしかった。 

陣山達矢 （18) 大阪府 
そうですね，陣山君のいうよう に ラストエ 
ンぺラーは東京で未だに上映されていると 
ころを見ると，確かに「売れた映圃はいい 
映画」というのは 当たっているよう な気が 
します。 

♦コンピュータからかけ離れた話で申し訳ない 
のですが， r なんてったってウルトラマン j とい 
う本はなかなか面白いですよ。このテの本はほ 
とんどが小学生向けで，意味のない情報（ウル 
トラマンの身長とか必殺技など）しか得られな 
いものですが，大人の目から見たウルトラマン 
というか，ウルトラマンが誕生するまでの企画 
段階の話や，円谷ブロやテレビ局の考え方とか 
実相寺昭雄監督によるウルトラマンの話など載 
っています。要するに少年時代にウルトラマン 
とその仲間を見て育った我々20歳代の人が，も 
う一度ウルトラマンの世界を見直すのにはうっ 
てつけの本といえそうです。まあ，880円くらい 
(友だちに本を貸してしまったから正確な値段 
を忘れてしまった）と，安いか高いかわからな 
いような値段なのでお勧めです。 


堀僚嗣 （22) 大阪府 
堀さん知ってます？ 東京地方ではなんと， 
朝の4時30分から強力なウルトラマンシリ 
ーズ2本立てが，いまもテレビで放映され 
ているんですよ。 

♦グアン！！ガタガタガタン。たたいま午後 II 
時50分30秒。桜島からの喷火の衝擎波が部屋に 
届きました。編集室に部屋の窓の外でとれた火 
山灰を送ります。塚本雅俊 （19) 鹿児島県 
わざわざ セロテープに 桜島の灰をく っつけ 
てハガキで送ってくれてありがとう。みん 
なで触って遊んでます。 

♦アパートでのひとり暮らしを始めて約丨力月。 
その間いろいろなことがありました。いきなり 
XI 専用ディスプレイが煙を出して故障し，その 
修理代に丨万5千円もかかってしまった。せっ 
かく貯めたお金でマウスを買おうと思っていた 
のに…… 。 人生ってこんなものでしようか。そ 
れから，5月号では定期購読の案内をありがと 
うございました。あれって僕が前にハガキに窨 
いてお願いしたからなのかな。 

飯野直樹 （18) 神奈川県 
定期購読の件にっいては，飯野君のほかに 
もたくさんの方からおハガキをいただいた 
ので， 遅くなりましたけどご紹介させて い 
ただき ま した。 

♦私は埼玉に住んでいますが，その埼玉で「38 
さいたま博覧会」などというものが開催されて 
おり，先日，私も友人とともに行ってきました。 
さて会場はさまざまな屋根を持ったパビリオン 
がたくさん並び，あの「つくば博」を思い起こさ 
せます。まず手始めに東芝館へと向かいました。 
待ち時間はかなりのものでしたが，つくば博に 
比べればかわいいものです。なかでは 3 D と CCD 
を使ったラジコンカーで遊んできました。その 
あといくつか見て回りましたが， 3 D 映像をウリ 
にしている館が多いようです。 HSST にも乗っ 
てきましたが。走行距離が短く，乗り心地とい 
われてもピンとこないのが実感でした。 

白石孝 （18) 埼玉県 
いまは地方博のオンパレードみたいですね 0 
でもウリものが HSST だったり，パンダだ 
ったりというのは，どうも地方博らしさ力す 
なくって個性に欠けるような気がするんで 
すけどね。 

♦私は春休みに北海道に行ってきました。その 
ときに靑函トンネルを通りました。これからこ 
のトンネルを利用される方のためにお教えして 
おきますが，本物に突入するまえにフェイント 
の小さなトンネルがありますので，そこではし 
ゃいでハジをかかないようにご注意を。それか 
ら，襟裳岬の JR バス待合室（燈台口）の見える 
場所に置いてある近鉄の切符は，この私のもの 
です。 坊農誠 （17) 奈良県 

青函トンネルっていうのも近いうちにぜひ 
一度は行ってみたいものですね。でもフェ 
イントのトンネルっていったいどちら側に 
あるんでしようか。ハジをかかないために 
も今度また教えてくださいね。 
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•掲載ご希望の方は，官製ハガキに項目（売る•買う•氏名•年齢•連絡方 
法…… ） を明記してお申し込みください。 

•ソフトの売買，交換については，いっさい掲載できません。 
•取り引きについては当編集室では貴任を負いかねます。 

•応募者多数の場合，掲載できない場合もあります。 


仲間 


★「 FSCMj では MZ -700/ I 500 ユーザーを対象とし 
た会員を募集します。活動は主に会報を中心と 
した情報交換などですが，今後，会員の皆さん 
からの意見もどしどし取り入れていきたいと思 
っています。また，ほかの MZ -700/ I 500 ユーザ 
ーズクラブの皆さんとの交流を図りたいと考え 
ていますので，各ユーザーズクラブの代表者の 
方からのご連絡も併せてお待ちしています。 
〒485愛知県小牧市南外山北官舎 C -2- I 03 
前田純之介 

★ MZ シリーズを対象としたサークルを今度発足 
させようと思っています。まだサークル名など 
は決まっていませんが，興味のある方は機種名， 
パソコン歴，活動内容に関するご意見などを添 
えて，連絡先を明記のうえ封書にて連絡を。〒 
203東京都東久留米市下里 7-8-13-502 野口 
貴史 （20) 

★「 MXC 」 では XI ユーザーの 会員を募集します。 
主な活動内容は ゲームの 情報交換や月丨回の会 
報発行などです。 ゲームファン，テープユーザ 
一， 初心者大歓迎。詳しいことは60円切手同封 
のうえ封書にてご連絡を。〒992山形県米沢 
市 東町 M -50 山 ロアパート 206 水口昌郁 
(19) 

★ XI / X 68000ユーザーの皆さんを対象とした X ユ 
ーザーズクラブ 「 WATER 」 では会員を募集しま 
す。当クラブでは初心者からその筋の方まで幅 
広く楽しんでいただける会報作りをしています。 
そのほかにも太田貴子ファンの方や小幡洋子フ 
ァンの方も大歓迎。興味のある方は60円切手同 
封のうえ封窨にて連絡を。〒975福島県原町 
市小川町 109-2 山崎潤一 （19) 

★「 WCj では XI および PC -88 ユーザーを対象とし 
た会員を募集します。活動は主に同人誌やオリ 
ジナルソフトの共同製作を中心に行っています。 
会報は毎回みんなが楽しめるものに仕上げよう 
と努力しています。興味のある方は60円切手同 
封のうえ封窨にて連絡を。〒734広島県広島 
市南区仁保 3-40-28 津田敏之 （18) 

★「 YUME - NETj では XI シリーズ， FM -7 シリー 
ズ， PC - 6000シリーズを対象とした会員を募集 
します。活動は会報を中心に FORTRAN , COBOL , 
BASIC の講座.ブログラム コンテスト， ゲーム. 
ビデオ情報などを行っています。入会ご希望の 
方は60円切手同封のうえ封窨にて連絡を。〒 
849-23 佐賀県杵島郡山内町大字宮野 26167-1 
森伸二 （17) 

★「 SPC 」 では第3期会員を募集します。対象は S 
-0 S ユーザー，シャープ 系パソコン ユーザーで 
あればどなたでも結構です。特に音楽に興味の 


ある方，ハードに強い方など大歓迎。また，同 
時に交流サークルも募集しています。詳しくは 
60円切手同封のうえ封窨にて連絡を。〒〇36 
靑森県弘前市東城北卜 6-3 菊池淳 （17) 
k 「倶楽部 FIGHTING 」 は X 68000 ユーザーからファ 
ミコン，ナイコンまで幅広く集まったゲーム中 
心のサークルです。活動はゲーム，マンガ，ビ 
デォ，小説，音楽など豊富な内容の会報を中心 
に行っています。会费は会報代として330円の 
み。詳しいことは60円切手同封のうえ封害にて 
連絡を。〒70卜42岡山県邑久郡邑久町尻海 
2738元山宽 （17) 


売リます 


★ MZ - I 500 用 RAM ファイル MZ - IRI 8, ポイスボー 
ド MZ - IM 08, データレコーダ MZHT 03 を 各5 千 
円で。連絡は往復ハガキで。〒948新潟県十 
日町市本町 6-2 高撟守（け） 

★ MZ - 2500用テレシステムズ製の 640 K バイト RAM 
DISK の未使用新品を丨万5千円で。または增設 
用 VRAM か辞害 ROM との交換も可。連絡は往復 
ハガキで。〒〇01北海道札幌市北区屯田 5-8 
-4-12 後藤修（け） 

★プロッタプリンタ CZ -8 PP 2( I 年間使用），漢字 
ROM 内蔵を I 万5千円で。漢字プリンタ TR - 
24 (2 年半使用）を2万円で。いずれも送料込 
み。連絡は往復ハガキで。〒952-13新潟県 
佐渡郡佐和田町中原3 13-1 青柳寺団地146石塚 
孝之 （31) 

★ XI 用プリンタ CZ -8 PC 2 を3万5千円前後で。連 
絡は往復ハガキで。〒675兵庫県加古川市野 
口町野口 542-23 藤原顕治 （17) 

★ XI 用 デー タレコーダ CZ -8 RLI マニュアル付き 
完動品を丨万円で。できれば近郊の方に手渡し 
希望。連絡は往復ハガキで。〒167東京都杉 
並区今川卜 1-1 今川荘村井裕弥 (30) 

★ XI 用データレ コーダ CZ -8 RLI の新品同様 （3 日 
間だけ使用）を送料別丨万円で。付属品付き。 
または CZ -8 BE 2 との交換も可。連絡は往復ハガ 
キで。〒520滋賀県大津市蓮池町 13-19 福 
島義浩 （19) 


★ XI 用カラーイ- 


-ジポー ド CZ -8 BV 丨を丨万円 


前後で。連絡は往復ハガキで。〒〇 20-01 岩 
手県盛岡市みたけ 4-1 卜56佐々木誠徳 （18) 

★ 乂丨用增設「00<2-503「><2基を4万5千円 
で（ただし I / F は丨枚のみ）。バラ売りの場合は 
I / F 付き2万5千円， FDD のみ2万円で。できれ 
ば2基セットで買ってくれる方希望。また ，XI 
用 I / O ポート CZ -8 EP を5千円で。連絡は往復 
ハガキで。〒849-11佐賀県杵島郡白石町大 
字福吉2003 -2 石橋和史（け） 

★ XI 用プリンタ CZ -8 PD 2 の付属品，箱付きを 


2万円前後で。また Xlturbo 専用ディスプレイ 
CZ -855 DB の付属品，箱付きを5万円前後で。ど 
ちらも丨年半ほど使用。連絡は往復ハガキで。 
〒478愛知県知多市つつじが岡 4-13-2 内藤 
陽一 (21) 


買います 


★ MZ - 700用 データレコーダ MZ - IT 0 I を 4 千円で。 
完動品であれば傷などは可。連絡は往復ハガキ 
で。〒624京都府舞鶴市宇伊佐津 327-23 田 
中智樹 （16) 

★ MZ - I 500 用 RAM ファイル MZ - IRI 8 を送料込み 
I 万円前後で。連絡は往復ハガキで。〒〇 13- 

01秋田県平鹿郡平鹿町浅舞字浅舞136照井 
清和 （17) 

★ MZ - 2000 用ユニバーサル I/O 力ード MZ -8 BI 0 I 
の完動品を送料込み2万円前後で。連絡は往復 
ハガキで。亍497愛知県海部郡 蟹 江町百保27 
-2 山森克己 （43) 

★ MZ - 2000用 FDD インタフヱイスを丨万円で。連 
絡は60円切手同封のうえ封窨にて。〒〇65北 
海道札幌市東区北23条東 12-1 S 上義広 （19) 

★ XI 用カラーディスプレイ CZ -600 D または CZ - 
880 D を6万〜7万円の範囲内で。またチルトス 
タンドを安価で。300/1200ポーのモデムを丨万 
〜丨万5千円で。連絡は往復ハガキで。〒596 
大阪府岸和田市璣ノ上町 4-10-7 加藤哲男 

★ XI 用熱転写プリンタ CZ -8 PC 2 ( I / F を含む)， 
または CZ -8 PC I +第2水準漢字 ROM • CZ -8 PCI -3 
をセットで3万8千円で。連絡は往復ハガキで。 
〒344-01埼玉県北葛飾郡庄和町米島 366-4 松 
本伸行 （16) 

★ XI 用 FM 音源ポード CZ -8 BSI (付属品すベて込 
み）を送料込み丨万〜丨万5千円で。連絡は往 
復ハガキで。〒977福島県田村郡三春町会下 
谷 18-10 石田実 （18) 

★ XI 用 FDD インタフェイス CZ -8 BFI +ディスク 
BASIC を5千〜丨万円くらいで。〒790愛媛 
県松山市久米窪田町443久米住宅233尾埜繁 
(33) 

バックナンバー 

★ Oh ! MZI 986 年 I , 2月号を送料込み各丨，000円 
で。切り抜き不可。連絡は往復ハガキで。〒 
105秋田県本荘市出戸町小人町 125-3 畠山拓 
真 （15) 

★ Oh ! MZ 1982年6, 7，8月号，1984年 • 1985 
年の各 I 〜12月号，1986年の丨〜5, 8, 9月号を 
1,000円で（1984年の各号については1,200円で)。 
多少の汚れ可，切り抜き不可。連絡は往復ハガ 
キで。亍815福岡県福岡市南区大橋 3-15-43 
大橋新光ハイム410号 兼重宣康 
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DRIVE ON 

このコーナーでは，本誌年間モニタの方々の 
ご意見を紹介しています。今月は5月号の記 
事に関するレポートです。 

•「手段としての BASICj に同感です。私自身， 
BASIC のプログラムを作っていて，できなか 
ったことは何ひとつありません（スピードが 
遅いだけです）。すべて BASIC でできました。 
RS-232C を使って温度モニタプログラムも作 
りましたよ。 HuBASIC のユーザー寄りの構成 
は，本当に使いやすいと思います。 

佐藤孝 (31) MZ- 2500埼玉県 
•他機種，とくに MZ-80K/C の場合は HuBA 
SIC が最高とも思えるが，我が MZ-I500 にな 
るといちがいにそうとは言えない。 BASIC が 
巨大になったため漢字処理機能がなくなった。 
あの HuBASIC なのだから， S-BASI 〇でサボ 
—卜されていない辞書 ROM のサボートくらい 
してもらえるかと考えたがダメだった。加え 
て実数版はおろか，整数型コンパイラも出な 
かった。そしてあの値段である。確かに丨万 
円は言語ソフトのなかでは安いのかもしれな 
いが，ぜひコンパイラもおまけでつけてほし 
かったと，丨ユーザーは言いたい。 

関根孝司 （I9)MZ-I500，PC-I480U 東京都 
籲 HuBASIC ほどマシンに密着した BASIC は 
ないと思う。マシン単体をみてもX丨はとんで 
もなく多機能だが，それを オプション 機器を 
除いてす ベて サボートした HuBASIC はすごい。 


巨大な BASIC ゆえにフリーエリアが小さい， 
スピードがちよっと，という難はあるが，ユ 
-ザーからみた BASIC で，これ以上のものは 
ないと思う。また，個人的には「美しくない 
から BASIC」 なのだとも思っている。字下げ 
や桁揃えなどをして見やすいプログラミング 
を心がけてはいるが，スパゲティプログラム 
でも BASIC だから動く，というところにそこ 
はかとない魅力を感じているのも事実だ。 

山 口 幸一 (22) X I turbo II， JR- 100, PC-E200 
宮崎県 

• 5 月号の特集を読んで反省しました C BASI 〇 
で多くのプログラムを組んできたにもかかわ 
らず，少なからず BASIC を馬鹿にしていると 
ころもあったのです。しかし，確かにこれほ 
ど手軽にプログラミングできる言語は珍しい。 
最初の BASIC がたった14のコマンドしか持っ 
ていなかった，ということにも改めて感慨を 
もよおしました。グラフィック，ミュージック， 
それにディスク入出力関係などを除けば，ほ 
とんどのプログラムはこの14コマンドで害け 
てしまうのでしようね。そして，XIが8ビッ 
卜の世界で長く活躍できるのは，開発コンセ 
プトの良さと HuBASIC の存在によるところが 
大きいと思います。 

薬師神昌夫 （17) XI turbo Z 愛媛県 
•「結局，最後は腕力が勝負です」という，特 
集の「美しい BASIC の学び方 j の考えに賛成 
です。ひらめきみたいなものも重要ですが， 
それは経験を積めば誰もが得られるものでも 
あります。つまるところ，プログラミング能 
力とは，デバッグ能力ではないでしようか。 


バグが出た。すべてチェックしたはずなのに 
動かない。そうした最悪の事態を打開してい 
く能力，それがプログラミングに必要な腕力 
だと思います。 

平木敬太郎 （20)X68000ACE-HD, PC- 6001 
/880I 福井県 

•現在の BASIC, とくに turboBASIC は非常 
に強力で，マシン語っぽいコマンドもあった 
りして重宝しています。ときどきマシン語の 
プロトタイプを作成するために用いることも。 
「BASIC の歴史と意義」を読みながら，イン 
タブリタ型であるがゆえの欠点，利点などに 
ついて，いちいちうなずいてしまいました。 
マシン語に染まっているといっても，やはり 
私は BASIC がけっこう好きなんですよね。特 
集で一番気に入ったのがハノイの塔のプログ 
ラムです。ちょっと変えて，結果を RAM ディ 
スクに落すようにしてN = 20でやってみたと 
ころ，45分走ったところで320 K いっぱいにな 
り， DEVICE FULL で止まってしまいました。 
N = 64で世紀末が見えるというのもうなずけ 
るな。 原悟 （18) XI turbo II宮城県 
•僕にとっての BASIC とはビデオのスローモ 
—シヨンのようなものである。 BASIC である 
がために動きが（内部構造が）よくわかるの 
だ。そして HuBASIC のよいところは，命令が 
豊富，新しい機能にもすぐ対応できる，など 
だが，似たような命令 （MUSIC/PLAY, SC 
REEN/GRAPH など）を多くつけるなら，そ 
の分フリーエリアを広げてくれたらいいのに， 
と CZ-8FB0I Ver2.0 を使っていると思う。 

福島義浩 （19) X I turbo 滋賀県 


ごめんなさいの 

コーナー 

5月号非 BASIC プログラマのための MML 

P.6I サンプルプログラムのテンポが少し速 
めでした， T38 〜40程度に変更してください。 
5月号あなたの知らない世界 
P.79 X 68000用のX Iエミュレータでは turbo 
用の BIOS が付属しませんのでX丨 turbo 用アプ 
リケーシヨンは実行できません。 

6月号人類タコ科図鑑 

P.29 ゼンジー北京は「中国は広島県生まれ」 

の誤植でした， 

6月号 X68000 用 MACINTO-C 

P.59 画面更新中に数値キーを押すと誤動作 
がありました。 

317 bne 〇 ont 

に変更し，318行に新しく， 

318 Back : 

というラベルの行を追加し，リスト丨のプロ 
グラムを末尾に加え，また，25行目のデータ 
は S0d, $0a, 0に変更してください 


6月号愛読者特大プレゼント 

P.65 通信ソフト XLINK の価格は19,800円の 

間違いでした。お詫びして訂正いたします。 

6月号狂気のこきりこ 

P.82 このプログラムの実行には1987年9月 

号の MML 拡張が必要です。 

6月号 A し AN 

P.I29 上下キーを入れ換える際のアドレスに 
誤りがありました。 

CB60 h CB63 h 
に修正してください。 

6月号ふらつベ 

P.I56 リストに一部欠けたところがありまし 
た。リスト2を追加してください 0 

リスト1 

* 変更 
NextCont : 

add. 1 #128, Pointer 

bsr Check し en 

bra BlockOut 


バグに関するお問い合わせは 

〇的 (2 B 3)2230( 直通) 

月〜金曜日 16 : 00〜18 : 00 


PrevCont : 



sub . 1 

#128, Pointer 


bra 

BlockOut 

Cont 




cmp . b 

#" g " ,d0 


beq 

NextCont 


cmp . b 

# M G",d0 


beq 

NextCont 


cmp . b 

# u t" f d0 


beq 

PrevCont 


cmp . b 

#"T",d0 


beq 

PrevCont 


bra 

.END 

Back 

リスト 2 


5870 

DATA ”！ +.- + 

+-+ +-+ ++ !’• 

5880 

DATA "!U 

H! !M T U U!" 

5890 

DATA "+ - 

-+ +- - +•， 

5900 

，一 5 メンー 


5910 

DATA 2,2,2 


5920 

DATA 3 


5930 

DATA 32,12, 

2 

5940 

DATA 8 ,10, 

2 

5950 

DATA 14,6 , 

1 

5960 

DATA 12,500 

お問い合わせは原則として，本誌の バグ情 

報のみに限らせていただきます 0 入力法，操 


作法などはマニュアルをよくお読みください 0 
また，よくアドベンチャーゲームの解答を 
求めるお電話をいただきますが，本誌ではい 
っさいお答えできません。ご了承ください。 
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ブログラム 
大募集！ 

/ jfiiSY からの誘惑 

▼あちこちで_の季節に入りましたが，皆 
さんの腕力には影響ないですよね？ Oh !X 
では投稿プログラ厶を歓迎しています。ピコ 
ピコ ゲーム， 大作 ゲーム，ツール や ユーティ 
リティ，ミュージック プログラム， ショート 
ショー トなど，どしどし応募してください。 

6月号に掲載された ALAN など，最近はとく 
に MZ - 2500 ユーザーの 活躍が目立っていま 
す。このところおとなしい XI ユーザーの 皆さ 
ん，負けずにがんばりましょう。怒清の投稿 
係はどんな作品でも受け付けます。 

なお，応募の要領は，このページの右端の 
撊を参照してください。 

▼エンドユーザーの 立場から，望ましい パソ 
コン環境について考えてきた「よりよ いソフ 
トウェア環境のために」は今月で連載を終了 
します。丨年間，応援ありがとうございまし 
た。 Macintosh の大好きな多摩豊氏にまた 
会える日を期待しましょう。 

▼マニアックなフアンの多かった「人類タコ 


科図鑑」も，残念ながら 最終回です。 おっと， 
石を投げないでください！祝一平氏は今月 
から 「 C 調言語講座 PRO -68 K 」 をスタート 
します。特集「実践 C 言語からの誘惑」につ 
いても含め，皆さんの意見，感想，提案など 
を編集室にお寄せください。 

▼定期購言売のお申し込みや，バックナンバー 
のご注文についてのお問い合わせをよくいた 
だきます。本誌でも，「バックナンバー案内」， 
および「編集室から j の最終ページにて，手 
続きの方法などをご案内しておりますので， 
そちらも參照してください c また，バックナ 
ンノく一が在庫切れとなりました場合，コピー 
サービス等はいたしかねますので，恐縮です 
があらかじめご了承くださるようお願いいた 
します。 

▼狭いとはいえ南北に長いわが国で，気候の 
話をすると，あちこちでインコンパチブルに 
なってしまいます。季節の変わり目だからっ 
て夏風邪なんぞをひくとたいへん。冬と違っ 
てマスクするわけにいかないし。えっ？ だ 
ってマスクって便利でしょ，堂々と顔が隠せ 
るんだもん。眼鏡もかけてると耳が痛くなる 
のが少々悲修だけど。とにかく健康には気を 
つけましよう。ではまた来月。 


す頁 

•原稿には，住所•氏名•年齢•職業*連絡 
先電話番号.機種 • 使用言語.必要な周辺 
艦 •マイコ ン歴を明記してください。 

•プログラムを投稿される方は，詳しい内容 
の説明，利用法 • できればフローチャート， 
変数表メモリマップ（マシン語の場合） 
に，參考文献を明記し，プログラムをセー 
ブしたテープ（デイスケット）を添えてお 
送りください。また，プログラムは最低2 
回はセーブしてください。 

•ハードの製作などを投稿される方は，詳し 
い内容の説明のほかに回路図，部品表で 
きれば実体配線図も添えてください。纏 
室で検討の上，製作したハードが必要な場 
合はご連絡いたします。 

_投^のモラルとして，他誌との二重投稿， 
他機種用プログラムを単に移植したものは 
固くお断りいたします。 

- • - 

あて先 

〒102東京者15千代田区九段南 2-3-26 井関ビル 


日本ソフトパンク出版部 

Oh ! X 「©0®®」係 


S H 1 

1 

F 

T • B 

R E A K 


►アスリートというスポーツドリンクを矢 (1 ってます 
か？なんと紅茶ベースのドリンクなんです。おも 
いっきり喉が渴いているときに飲んでしまった私は， 
あまりの味に30分ほど死んだうえにまるまるひと月， 
紅茶 SSctte になってしまいました。私でさえこうな 
るのだから普通の人だと……想像がつかん。さあ， 
いっぺん飲んでみたまい c (で） 

►エーン，エーン。即戦力の文書ディスクがぶっと 
んだよ一。それも，今月号のレビューと，今書いて 
いる編集後記を，プリンタに打ち出す前にぶっとん 
じゃったんだよぉ一。ひっく，ひっく。ちゃんとプ 
ロテクシトールを貼ってたのに一，それと私の文書 
ディスクを使って巻き添えをくった（で）さん•ご 
めんなさい。 （悲しみにひれ伏す H.K.) 

►春が来て，とうとう我がサークルにも新入生が入 
ってきました。みんな若い！元気！先輩って大 
変なんだなあと痛感するこのごろです。ところで7 
月2日筑波サーキットで行われる「筑波サタデージ 
ムカーナ」に参戦します。ひまな人は応援しに来る 
ように。しかし愛車アルシオーネは…… 。 

(またしても被害にあった C.W.) 
►暇になると WERDNA をやっつけては帰ってくる。 

向けば AMULET of WERDNA を20イ固ぐらい 
持ち帰ってみたり，どんどんクラスチェンジして年 
寄りだらけにしてみたり，それに飽きると若返らせ 
てやったり，おそ松君ごっこしたり，地下丨I階を歩き 
回ったりして遊ぶ。僕の醒めた顔を想像してみてくれ。 
(II以降がやりたかった2500ユーザーの T.M •改め Mu) 


►ザンギリ頭を叩いたら音がして以来100年以とた 
ったわけだが，未だに情けないのはスーツを着こな 
しているサラリーマンをほとんど見ないことだ。ネ 
クタイだってきちんと締めていない（つまり曲がっ 
ていたりずれていたり）人が多い。ワイシャツの一 
番上のボタンが留められないなんてみっともないわ 
暑苦しいわで，だからサラリーマンは嫌いだ。 （K) 
►私は昨日，とある会社の社長さんから，非定型サ 
イズでいかにも情けない風情の茶色い封筒を買った。 
なんでも 「i^i： に出入りしている人はみんな買っ 
ているよ j という口車にのせられて買ってしまった 
のだが，本当だろうか。事務所に遊びに行った奈野 
さんは袋貼りまで手<云わされたというし……。ねえ 
K.0 さん，本当ですか？ （K_S.) 

►少し前のこと，編集室で祝一平氏がこっそりと何 
かをプリントアウトしていた。思えば，あれが本誌 
6月号のあの広告の原稿だったのだ（何も教えてく 
れないんだから)。今，僕の手には創刊号がある（定 
期講読の予約をしたんだよ）が，ディスクを包む厚 
紙の「質実岡I】健 j には笑ってしまった。でも僕は「逆 
襲のシャア」は好きですよ。 （K0) 

►今日銀行でキャッシュカードを使おうとしたら， 
前の女の人がなかなか終わらない。どうしたんだろ 
うと思って見ると，どうやら何度も限度額一杯の現 
金を引き出しているらしい勿です。おそらくはI千 
万円以上になった頃，その機械は"打ち止め”にな 
り，その人は紙袋を抱えて隣の引き出し機の列に並 
んだのでした。東京って怖いとこですね 一。 （M) 


► 1 ■次の誕生日でいくつになる？ j 「次……次の誕生 
日は，もうないんだ j 醉っ払って暴れた男が，自分 
を捕らえた警官の問いにそう答える。見えすいた演 
出だとは思うが，癌で余命数力月を宣告される建築 
家を演じたブライアン.デネヒーの最後の科白は， 
とてもこたえた。悪徳保安官でも宇宙人の親玉でも， 
とにかくこの俳優はすごいと思う。 （よ） 

►先月の答えですが，I, 3問目は主題歌に出るし， 
2問目は毎週出てきたセリフだし，ということで省 
略。難問は4問目で答えは「ラルフ」(アニメでは犬 
の名前)。全問正解者はただ者ではありません。2， 

3問正解の人は立派なオタクさんですね。なお，私 
の知人なら私を「オタク j とは呼ばないでしょう。 

(もっと無茶苦茶いわれそうな気もする U) 
►最近;12~ 13歳くらいの若い世代の方々からのハ 
ガキが多くなり喜んでいます。それと，これまで「X 
68000が欲しいが嫁さんがコワイ」と亭主族の攻擎 
の的にされていた若い奥様方からの反擎<7)お便りも 
多くなり，そのハガキを読むたびに大笑いしていま 
す。こんなパソコン雑誌ってあるのかな？これか 
らもこのような関係を大切にしたいものです。 （N) 
►今月号は特集からじて C だっナ三ので, X68000 より 
の話が多くなってしまった。確かに，もっと X68000 
の記事をという要望は高いのだが,読者の数はX丨ユ 
-ザーのほうが多いので，いつもこうだと期待され 
てもちょっと困る。また，8ビットユーザーにはも 
っともっとがんばってもらいたい。まあ，早〈16ビ 
ットに乗り換えたい気持ちもわかるけどね。 (T) 
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microOdyssey 

5 月の深夜，「魚が出てきた日」という映画が 
テレビで上映されていた。この映画は，核物質 
を積んだ飛行機が地中海に浮かぶ島に墜落，そ 
の前に乗務員とともにパラシュートでそこに投 
下された核物質の入った3つの箱を巡って島民 
や観光客，そして極秘に送り込まれた軍のェー 
ジェントたちが繰り広げる騒動を比較的軽いノ 
リ のコメディタ ッチで描いたものなのだが，し 
かしそのラストシーンは凄く，夜の海岸で若者 
たちや観光客がはしやいでいるところに，羊飼 
いの手によって海中に捨てられた核物質の影響 
で魚が次々と海面に浮かび上がり，「警告します」 
という冷静な男の声のアナウンスが流れるシー 
ンで終わる。 

この映画は1967年に製作されたもので，私は 
いちばん最初はテレビの映画番組（荻昌弘さん 
の月曜ロードショウ）で17~18年前に観ている。 
そして，そのときこのラストシーンになんとも 
いえぬ恐怖感を抱いたものだった。その後，こ 
のラストシーン見たさにリバイバル上映時には 
映画館にも足を運んだこともある。 

あのころはいまよりもっと感受性が強く，柴 
田翔や庄司薫の世界にどっぷリと首まで漫かっ 
ていて，「アイスコーヒーにミルクを入れて，ク 
ルクルとストローでかき混ぜる瞬間が好き。こ 
うして混ざっていくの見ていると人生を感じる」 
などという軟弱な会話文を読んでは感動し，喫 
茶店をはしごしてはアイスコーヒーをひたすら 
クルクルかき混ぜていたものである。 

まっ，それはどうでもいいとして，原発事故 
が起きた当時は，ヨーロッパから輸入されるワ 
インや乳製品の安全性が問われていたこともあ 
った。しかし，それもいつしか忘れ去られ，最 
近では事故後のチ x ルノブイリの記録映画を撮 
った監督が死亡したというニュースが話題を集 
めたくらいのものだ。だが，最近になって再び 
輸入食品の放射能汚染問題が全国生協組合を中 
心と した市民 レベルの 任意団体，「全国生協砠合 
員 ノーモアチェルノ ブイリの 会」 の手によって 
取り上げられようとしている。 

この会は，放射能汚染値に安全制限はないと 
いう考えを基に，汚染食品の影響が高いと思わ 
れる年齢が低い子供たちを守ろうと発足された 
もので，現在，輸入食品の放射能汚染値を個々 
の商品に表示するなど，10項目の公開質問状を 
用意し厚生省に提出するための署名運動を行っ 
ている。それは，現状では輸入食品全体の被ばく 
線限度の暫定基準(現行では年間500ミリレムの 
1/3以内）を厚生省が設置しているものの，それ 
の基準をクリアして商品として家庭内に入り込 
んだときは，もう放射能汚染などということ自 
体が誰の目にもわからないものとなっているか 
らだ。 

今回のように，市民団体が提示した食品に関 
する問題というのは，明らかに我々の日常生活 
を脅かす存在であり，放射能の蓄積摂取置がど 
うのといったことが世間一般に表面化するころ 
には，とても取り返しのつかない事態になって 
いる場合が多い。先に述べた映画の話のように， 
魚が浮かび上がってからの警告がなんの意味を 
持たないのは恐ろしい現実である。しかし，そ 
の魚を食べていることすら気づかないといった 
ことだけは決して見逃してはならない ( N ) 


1988年8月号7月18日（月）発売 

特篥1ひと夏の数値演算 
特集2 MIDI プログラミング 

全機種共通システム 

マルチウインドウェテイタ WINER 
新連載 Z 的実践マシン語講座 


バックナンバー常備店 


東京 

神保町 

三省堂神田本店 5 F 
03(233)3312 


// 

窨泉ブックマート BI 
03(294)001 1 


// 

害泉グランデ 5 F 

03(295)001 1 


八重洲 

八重洲ブックセンター 3 F 
03(281)181 1 


新宿 

紀伊国屋窨店本店 
03(354)0131 


高田馬場 

未来堂軎店 

03(200)9185 


渋谷 

大盛堂害店 

03(463)051 1 


池袋 

西武百貨•店丨 IF ブックセンター 
03(981)01 1 1 


// 

西武百貨店 9 F 

コンビュータ • フォーラム 

03(981)011 1 


町田 

久美堂東急ハンズ店 
0427(28)2783 

神奈川 

横浜 

有隣堂横浜駅西口店 
045(311)6265 


// 

有隣堂ルミネ店 

045(453)081 1 


神奈川 

藤沢 

有隣堂藤沢店 

0466(26) 1411 


厚木 

有隣堂厚木店 

0462 (23)41 11 


平塚 

文教堂四の宮店 
0463(54)2880 

千葉 

柏 

新星堂カルチェ 5 

0471 (64)8551 


船橋 

西武百貨店 1 0 F ブックセンター 
0474 (25)01 11 


// 

芳林堂軎店津田沼店 

0474 (78)3737 


千葉 

多田屋千葉セントラルプラザ店 
0472(24) 1333 

埼玉 

川越 

黒田害店 

0492(25)3138 


川口 

岩浏書店 

0482(52)2190 

茨城 

水戸 

川又窨店駅前店 
0292(31)0102 

大阪 

都島区 

駸々堂京橋店 

06(353)2413 

京都 

中京区 

オーム 社書店 

075(221)0280 

愛知 

名古屋 

パソコン 2 上前津店 
052(251)8334 

長野 

飯田 

平安堂飯田店 

0265(24)4545 

北海道 

室蘭 

室閬工業大学生協 
0143(44)6060 


定期購鏑のお知らせ 

Oh ! X の定期購読をご希望の方は，最寄り 
の郵便局にある払込用紙に， 

口座番号東京 1-29307 

加入者名株式会社日本ソフトバンク 

とご記入のうえ，年間購読料6,500円を添えて 

お申し込みください。その際.裏面の通信欄 

に「〇年〇月号より Oh ! X 定期購読希望」と 

忘れずに明記してください。なお，すでに定 


期購読をご利用いただいている方には，購読 
期限終了と同時にご通知申し上げますので， 
同封の払込用紙をご利用ください。 

海外送付ご希望の方へ 
本誌の海外発送代理店，日本 IPS (株）にお 
申し込みください。なお，購読料金は郵送方 
法，地域によって異なりますので，下記宛必 
ずお問い合わせください。 

日本 IPS 株式会社 

〒101東京都千代田区飯田橋 3-11-6 
S 03(238)0700 
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広告営業 003(297)01 81 

■本社〒102東京都千代田区九段南 2-3 14靖国九段南ビル Sf 03(263)3690( ft ) 
TELEX 東京 232-4614 JSBTYJ FAX 03(263)3660 
■西日本営業部〒541大阪府大阪市東区南本町2_6明治生命堺筋本町ビル 10 F 
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特集オール•サッツ•エディタ 

スクリーンエディタ MIFES Ver .4 /Final Ver .4 
メモリエディタ PC -9801 用メモリの管理方法 

PC - 8801用オリジナルエディタ ACE 88 
エディタとしてのワープロ「新松 j のカスタマイズ機能を探る 
ファイルエディタ/フォントエディタ/ミュージックエディタ 
第2特集ワープロソフト徹底研究 

ワープロソフトにおける日本語入力の現状を探る 
修 MS - DOS 機能拡張スペシャル オリジナ J レ D-shelK 士様公開 
癱最新ソフトオーバービュー PI / 言図/ CDCT -98 I 
• WATCH ! マイコンショウ S ビジネスショウ 
♦好評連載ソフトを評論するシルエツト 


月刊 


Oh/FM 


7月号 
540円 





特集I手作り言語道入門 

言語作りは難しくなし V 電卓言語によるロボット戦争/巳 A 
SIC によるタイニー巳 ASIC /作者が語る HGPLAY の 
構造/タイニーインタプリタ/ USP インタプリタ 

特集 n トライ./パソコン通信2 
Oh / FMNET 新システムガイド/名社モデムレポート/ 
FS ターミナルソフト / B ビットダンプコンバータ 
〈新連載〉言語見聞緑/音楽プログラム入門 
連載無敵のエチュード/6809マシン語道場 / Computer 
MUSIC / 谷山浩子のエッセイ 

マイコン S ビジネスショウレポート 


月刊- 


コンピュータ技術者必携 
第2禰•第')襦•特稽受钱 


情報処理試験 


7月号 
580円 


月刊、 

情報処理試験 

が一 _ *«/ S3*4«W 

STT 2 锺绐格翻 

晒捆 

mm 

3ンビュータ 
英用斑 
八ンドブック 





M 年4月2種試験の完全研究 
午前•午後の全問題を詳細に解説/ 

►カラー受験ゼミ次世代コンピュータ 
►ザ•プロジェクト日本•台湾の技術協力で実現した 
低価格 • 高機能 ICE 

►続•コンピュータ最前線わが国の AI の現状を眺める 
► 連載講座 合格のための八ードウェア基礎/合格のためのソフトウェア 
基礎/関連知識重点ゼミ数学 • 工業. 商業/受験に役立つコンピュータ英語 
/徹底マスター流れ図/合格最短ゼミ CASL • FORTRAN • COBOL 
► 1種重点講座 必須コンピュータの知識/徹底マスタープログラム設計 
〔別冊付録）対訳•コンピュータ英用語八ンドブック 


月刊 


Beep 


7 月号 
420円 





特集 1PC エンジン宅配便 

データで見る PC エンジン/八ードで見る PC エンジン / R 夕 
イプ n /ギャラガ’88/ファンタジーゾーン/ワールドスタジア 
厶 / PC エンジンお買い得情報他 
特集2狂喜乱舞/セガ•力ーニバル// 

口ードオブソード/サンダーブレード/ファイナル•バブルボ 
ブル/め組レスキュー/スーパーレーシング他 
•今月のパイルドライバーギャラクシーフォース 
•徹底研究スペシャル飛龍の拳 n ( ファミコン)/イース d (パ 
ソコン)/究極八リキリスタジアム（ファミコン） 

•特別付錄 SUPER GAME MUSIC 


ffli-fi-i-ii-i-iii-fii-i-i 日本ソフトバンク 


■デ：- ir 彳^ 

_ m 

111 人 - 11 聽 


鷗才ん•ザッツ土ティタ 





酬層 i 


Oh! X 1988.7. 169 









// 

習志野市 
船橋市 

// 

// 

// 

// 

柏 市 

// 

松戸市 

// 

橫浜市 

// 

// 

// 

// 

// 

// 

// 

// 

// 

川崎市 

// 

// 

// 

// 

鎌倉市 

// 

撗須*市 
藤沢市 

// 

// 

茅ヶ崎市 
平塚市 

// 

小田原市 

// 


大宮市 

/〆 


// 

宇都宮市 

// 

// 

小山市 
前橋市 

// 

// 

高崎市 

// 

// 

// 

太田市 

〈首都圏〉 

浦和市 

// 


く北海道〉 
礼榥市 

// 

// 

// 

// 

// 

// 

旭川市 

// 

苫小牧市 
〈東北〉 
背森市 

// 

弘前市 
八戸市 
盛岡市 

// 

// 

仙台市 

// 

// 

// 

// 

// 

秋田市 
山形市 
福島市 

// 

郡山市 
いわき市 

" 

く間東〉 

水戸市 


押田嫌文堂 

0486-4 卜3141 

相棋原市 

文教堂橋本店 

0427-74-5581 

ブックランド押田 

0486-47-3141 

// 

文教堂星ヶ丘店 

0427-58-6121 

三省堂ブックポート 
須原屋蕨店 

0486-46-2600 

0484-44-1211 

津久井郡 
く東京〉 

文教堂城山店 

0427-82-9278 

岩渕書店川口店 

0482-52-2190 

千代田区 

三省堂窨店神田本店 

03-233-3312 

黒田書店川越店 

0492-25-3138 

// 

軎泉グランデ 

03-295-001 1 

芳林堂所沢店 

0429-25-5355 

// 

東京堂窨店 

03-291-5181 

いけだ窨店所沢店 

0429-28-3271 

// 

旭屋窨店水道橋店 

03-294-3781 

黒田書店上福岡店 

0492-66-0120 

// 

丸蕃お茶の水店 

03-295-5581 

文教堂朝®店 

0484-76-0107 

// 

巌翠堂 

03-291-1362 

新星堂志木店 

0484-74-0182 

// 

いずみ神田南口店 

03-254-8521 

文教堂春日部店 

0487-52-7666 

// 

明正堂秋葉原店 

03-257-0758 

錦電 サービス 

0492-96-2962 

中央区 

八重洲ブックセンター 

03-28 卜 1811 

多田屋セントラルプラザ店 

0472-24-1333 

// 

日本橋丸蕃 

03-272-7211 

キディランド干葉店 

0472-25-201 1 

// 

旭屋窨店銀座店 

03-573-4936 

巌翠堂 

0474-72-5011 

港 区 

害原新橋店 

03-591-8738 

ときわ書房本店 

0474-24-0750 

// 

雄峰堂 N S 店 

03-503-6586 

リブロ船橋店 

0474 -25-01 II 

// 

虎ノ門害房本店 

03-502-3461 

旭屋窨店船撟店 

0474-24-7331 

// 

虎ノ門書房田町店 

03-454-2571 

芳林堂津田沼店 

0474-78-3737 

品川区 

芳林堂大井町店 

03-474-4946 

第二巌翠堂 

0474-65-0926 

// 

明屋窨店五反田店 

03-492-3881 

西ロアサノ 

0471-44-2111 

渋谷区 

紀伊國屋窨店渋谷店 

03-463-3241 

新星堂柏店 

0471-64-8551 

// 

旭屋窨店渋谷店 

5 省堂窨店渋谷店 

03-476-3971 

堀江良文堂 

0473-65-5121 

// 

03-407-4545 

辰正堂駅ビル店 

0473-64-7997 

// 

大盛堂書店 

03-463-051 1 

有隣堂 トーヨー 店 

045-311-6265 

// 

紀伊國屋軎店笹塚店 

03-485-0131 

有隣堂東ロルミネ店 

045-453-0811 

新宿区 

紀伊國屋窨店本店 

03-354-0131 

栄松堂相鉄ジョイナス店 

045-321-6831 

// 

三省堂書店新宿西口店 

03-343-4871 

そごうブックセンター 

045-465-2111 

// 

福家耆店センタービル店 

03-345-1246 

丸蕃ブックメイツポルタ店 

045-453-6811 

// 

福家窨店野村ビル店 

03-342-0298 

有隣堂伊勢佐木店 

045-26 卜 1231 

// 

新星堂 NS ビル店 

03-344-2055 

有隣堂戸塚店 

045-88 卜2661 

// 

西武新宿ブックセンター 

03-208-0380 

文華堂戸塚店 

045-864-5151 

// 

芳林堂 B 田馬場店 

03-208-0241 

アーバン文華堂 

045-821-5151 

// 

未来堂 

03-200-9185 

文教堂靑葉台南口店 

045-983-5150 

豊島区 

旭屋軎店池袋店 

03-986-031 1 

有隣堂アゼリア店 

044-245-1231 

// 

芳林堂池袋店 

03-984-1 101 

有隣堂川崎 BE 店 

045-26 卜 1231 

// 

リプロ池袋店 

03-981-0111 

文学堂本店 

044-244-1251 

// 

三省堂窨店池袋店 

03-987-0511 

ブックセンター文教堂 

044-811-5557 

// 

新栄堂本店 

03-984-2345 

文教堂溝の口店 

044-811-8258 

// 

新栄堂アルパ店 

03-988-0181 

島森窨店大船店 

0467-46-3841 

台東区 

明正堂中通り店 

03-831-0191 

鎌倉書店 

0467-46-2619 

墨田区 

リブロ錦糸町店 

03-846-0111 

平坂窬房 WALK 店 

0468-25-5537 

// 

ブックストア•談 

03-635-1841 

有隣堂藤沢店 

0466-26-1411 

江東区 

新栄堂龜戸駅ビル店 

03-638-2345 

リブロ藤沢店 

0466-27-0111 

江戸川区 

文教堂西葛西店 

03-689-3621 

文教堂六会店 

0466-82-9610 

大田区 

アクトブックスサンカマタ店 

03-735-1551 

川上窨店ルミネ店 

0467-87-3827 

// 

奄文堂大森駅ビル店 

03-775-3851 

サクラ 害 店駅ビル店 

0463-23-2751 

中野区 

明屋耆店東京本社 

03-387-8451 

文教堂四之宮店 

0463-54-2880 

杉並区 

ブックセンター获蓮 

03-393-5571 

八小堂窨店 

0465-22-7111 

// 

窨原杉並店 

03-313-4778 

伊勢治•店 

0465-22-1366 

武蔵野市 

紀伊國屋 害 店吉祥寺東急店 

0422-21-5543 

文教堂小田原店 

0465-36-3677 

// 

弘栄堂吉祥寺店 

0422-22-1031 

有隣堂厚木店 

0462-23-4m 

// 

パルコブックセンター吉祥寺 

0422-21-8122 

文教堂中央林間店 

0462-75-4165 

調布市 

真光書店 

0424-87-2222 

文教堂相樸大野店 

0427-49-0650 

府中市 

啓文堂 

0423-66-3151 


紀伊國屋害店札幌店 

01 卜 23 卜 2131 

旭屋書店札榥店 

011-241-3007 

丸善札幌支店 

011-241-7252 

リーブルなにわ 

011-221-3800 

冨貴堂札幔バルコ店 

01 1-214-2303 

ダイヤ窨房本店 

011-712-2541 

ダイヤ窨房西店 

011-665-6223 

旭川*貴堂 

0166-26-3481 

ブックス平和マルカツ店 

0166-23-6211 

旭屋窨店苫小牧店 

0144-36-5185 

成田本店 

0177-23-2431 

岡田軎店 

0177-23-1381 

紀伊國屋窨店弘前店 

0172-36-4511 

伊吉窨院 

0178-44-1917 

東山堂プックセンター 

0196-53-6464 

さわや書店 

0196-53-441 1 

第一窨店 

0196-53-3355 

金港堂 

022-225-6521 

金港堂ブックセンター 

022-223-0979 

アイエ害店駅前店 

022-264-0718 

丸善仙台支店 

022-266-1 127 

高山書店 

022-263-1511 

ブックスみやぎ 

022-267-4422 

三浦窨店 

0188-33-8131 

八文字屋 

0236-22-2150 

岩瀬窨店コルニエツタヤ店 

0245-21-2101 

博向堂 

0245-21-1 161 

東北害店 

0249-32-0379 

ヤマニ窨房本店 

0246-23-3481 

鹿島ブックセンター 

0246-28-2222 

川又書店駅前店 

0292-3 卜 0102 

ツルヤプックセンター 

0292-25-271 1 

武石窨店 

0292-73-1212 

なみき害店 

0299-96-1855 

共栄堂 

0298-21-6134 

丸蕃筑波大学会館店 

0298-5 卜 6000 

友朋堂吾妻本店 

0298-52-3665 

落合窬店オリオン店 

0286-34-3777 

落合軎店東武ブックセンター 

0286,34-8271 

新星堂宇都宮店 

0286-33-2337 

進駸堂駅ビル店 

0285-25-1522 

煥乎堂 

0272-23-1211 

リブロ前撟店 

0272-34-1011 

戸田書店前橋店 

0272-61-5063 

学陽書房 

0273-23-4055 

サカヰ書店 

0273-62-1500 

新星堂《崎店 

0273-27-3961 

戸田書店高崎店 

0273-63-51 10 

ナカムラヤ 

0276-22-2001 

須原屋本店 

0488-22-5321 

須原屋コルソ店 

0488-24-5321 


日本ソフトバンクの 

書籍特約書店 


下記の書店の一覧は、日本ソフトバンク書籍特 
約店として右にある商品の低新刊もとりそろ 
えております。ご希望の商品がある場合は、下 
記のお近くの書店にてお買い求め下さい。 

(注)現品が売れて補充中の場合もございますので、 
ご注意下さい0 


SOFT 

BANK 


日本ソフトバンク出版事業部 

〒102東京都千代田区九段南 2-3-26 广03 (261 )4095 


全国特約書店一覧 



市市市 
.木和1 
厚大相 


市市市市 市市市市郡市 
//口越沢//卵 II 木 0 S5 企葉 
蕨川川所上朝志春比千 


市郡市市 
//田島浦波 
勝鹿土筑 







































































































// 

// 

// 

姬路市 

// 

和歌山市 

// 

〈中国〉 
岡山市 

// 

津山市 
広 A 市 

// 

" 

// 

福山市 

// 


名古屋市 

// 

// 

// 


三省堂窬店名古屋店 

052-562-0077 

福山市 

啓文社コア 

0849-4 卜 0909 

丸蕃ブックメイツセントラルパーク 

052-97 卜 1231 

山口市 

五十部誠文堂 

0839-24-6630 

日進堂上前津店 

052-263-0550 

// 

文栄堂 

0839-22-5611 

三洋堂パソコンショップ 2 

052-251-8334 

宇部市 

京屋窨店 

0836-3 卜 2323 

三洋堂认中店 

052-832-8202 

防府市 

誠文堂国街店 

0835-25-1988 

ちくさ正文館本店 

052-74 M 137 

烏取市 

富士窨店 

0857-23-7271 

白樺窨房西店 

052-774-7223 

松江市 

困山窨店 

0852-21-4167 

精文館 

0532-54-2345 

く四国〉 



ブックス鎌倉 

0564-54-1822 

徳島市 

小山助学館本店 

0886-54-2135 

三洋堂刈谷店 

0566-24-1134 

// 

小山助学館東口店 

0886-25-1380 

三洋堂勝川店 

0568-32-7806 

// 

森住丸蕃 

0886-23-3228 

自由害房 

0582-65-4301 

高松市 

宮脇窨店本店 

0878-5 卜 3733 

大洞堂ブックス 258 

0584-81-2553 

丸龜市 

宮脇窨店丸龜店 

0877-22-5533 

大洞堂岐大バイバス店 

0584-74-7766 

松山市 

紀伊國屋害店松山店 

0899-32-0005 

三洋堂可児店 

0574-63-2334 

// 

明屋窨店本店 

0899-41-4141 

別所窨店 II ビル店 

0592-24-1014 

U 

明星窨店大街道店 

0899-41-4242 

文化センター白揚 

0593-51-0711 

// 

丸三窨店 

0899-31 -8501 

シエトワ白搨鈴鹿店 

0593-82-5221 

宇和島市 

明屋宇和島店 

0895-23-1 118 



高知市 

金高堂 

0888-22-0161 

» 々堂京宝店 

075-223-1003 

く九州 • 沖縄〉 


アバンテイ • ブックセンター 

075-682-5031 

福岡市 

紀伊國屋 害 店福岡店 

092-721-7755 

オーム社書店河原町店 

075-221-0280 

// 

り一ぶる天神 

092-713-1001 

ジュンク堂京都店 

078-252-0050 

// 

福岡金文堂 

092-741-2106 

枝々堂大丸店 

0742-26-6241 

// 

積文館新天町店 

092-78 卜 2991 

旭屋窨店本店 

06-313-1191 

// 

金文堂朝日ビル店 

092-43 卜 1094 

紀伊國屋窨店梅田店 

06-372-5821 

北九州市 

ナガリ 害 店 

093-521-1044 

オーム社窨店大阪店 

06-345-0641 

// 

金栄堂 

093-531-3685 

肢々堂京橋店 

06-353-3209 

// 

旭屋窨店北九州店 

093-63 卜 6421 

坡々堂心斎橋店 

06-251 -0881 

// 

井筒屋ブックセンター 

093-64 卜 0131 

旭屋窨店ナンバ店 

06-644-2551 

// 

カルパーク平野 

093-66 卜 7988 

ナンパブックセンター 

06-644-5501 

// 

白石書店本城店 

093-60 卜 2200 

旭屋窨店アベノ店 

06-631-6051 

久留米市 

エマックスたがみ 

0942-33-1841 

ユーゴー窨店 

06-623-2341 

飯塚市 

ブックリード 

0948-25-7266 

河村窨店 

06-95 卜 2968 

大分市 

パルコブックセンター大分 

0975-35-0643 

水鵷窨房京阪デパート店 

0720 -5 卜 3432 

// 

本町晃星堂 

0975-33-0231 

コーべブックス西武高槻店 

0726-83-1766 

別府市 

明倫堂 

0977-23-0936 

ヒパリャ窨店本社 

06-722-1121 

宮崎市 

田中窨店中央店 

0985-24-5111 

ジュシク堂センター街店 

078-392-1001 

// 

宮嵴寿屋 

0985-27-4111 

ジュンク堂サンパル店 

078-252-0777 

佐賀市 

金華堂北パイパス店 

0952-32-1965 

海文堂書店 

078-33 卜 6501 

// 

積文館デイトス店 

09S2-Z1-1V55 

日東館書林 

078-391-8701 

長崎市 

メトロ 書店 

0958-21-5453 

新興窨房 

0792-85-3344 

// 

好文堂 

0958-23-7171 

誠價堂窨店 

0792-81-2055 

佐世保市 

金明堂 

0956-22-4214 

宮井平安堂 

0734-31-1331 

熊本市 

紀伊國屋害店熊本店 

0963-22-5531 

帯伊窨店 

0734-22-0441 

// 

BOOKS まるぶん 

0963-52-5665 



// 

長崎書店 

0963-53-0555 

紀伊國屋害店岡山店 

0862-32-341 1 

人吉市 

明屋人吉店 

0966-22-5486 

丸蕃岡山支店 

0862-31-2261 

鹿児島市 

春苑堂ブックプラザ 

0992-22-2131 

津山ブックセンター 

08682 -6-4047 

// 

ブックスみすみ 

0992-57-1011 

紀伊國屋窨店広島店 

082-225-3232 

那覇市 

球陽堂ビル店 

0988-63-3752 

丸蕃広島支店 

082-247-2251 

// 

文教 図 窨 

0988-62-1201 

金正堂 

082-248-3715 




積善 館 

082-248-3151 




啓文社 福 山店 

0849-22-31 11 




ブックシティ啓文社 

0849-25-0050 





三《市 

三省堂害店三*店 

0422-48-4510 

// 

東西害房 

0422-46-0275 

小金井市 

文教堂小金井店 

0423-86-0161 

国分寺市 

三成堂国分寺店 

0423-25-3211 

国立市 

東西窨店 

0425-75-5061 

小平市 

文教堂小平店 

0423-43-9229 

柬村山市 

文教堂東村山店 

0423-96-II 15 

立川市 

オリオン軎房ウイル店 

0425-27-231 1 

八王子市 

くまざわ窬店本店 

0426-25-1201 

町田市 

有隣堂町田店 

0427-23-3018 

// 

久美堂本店 

0427-25-1330 

// 

久美堂小田急店 

0427-27-1111 

// 

久美堂東急ハンズ店 

0427-28-2772 

〃 

文教堂 H 川店 

0427-35-4117 

// 

文教堂小川店 

0427-96-1781 

多摩市 

くまざわ書店桜ヶ丘店 

0423-37-2531 

福生市 

文教堂福生店 

0425-53-7708 

〈信越 • 北陸〉 


畏野市 

平安堂長野店 

0262-26-4545 

// 

長谷川害店 

0262-26-2122 

松本市 

ブックス□クサン 

0263-35-5555 

// 

改造社松本駅ビル店 

0263-36-3777 

飯田市 

平安堂飯田店 

0265 -24-4545 

岡谷市 

笠原害店 

0266-23-5070 

瑰訪郡 

平安堂誨訪店 

0266-28-1111 

新溜市 

紀伊國屋窨店新潟店 

025-241-5281 

// 

萬松堂 

025-229-2221 

" 

北光社 

025-228-2321 

長岡市 

覚張窬店 

0258-32-1 139 

" 

ブックセンター ft 岡 

0258-36-1360 

// 

長岡技太*峰文化 

0258-46-6437 

富山市 

瀬川窨店 

0764-24-4566 

// 

清明堂 

0764-24-4166 

U 

BOOKS なかだ躉田店 

0764-32-1353 

// 

文苑堂本郷店 

0764-22-0552 

// 

文苑堂赤江店 

0764-33-0321 

高岡市 

文苑堂 

0766-21-0333 

// 

文苑堂横田店 

0766-21-0431 

金沢市 

うつのみや片町店 

0762-21-6136 

// 

書林香林坊本店 

0762-20-501 1 

石川郡 

王樣の本野々市店 

0762-46-5325 

福井市 

勝木書店 

0776-24-0428 

// 

品川書店新田塚店 

0776-24- 1112 

く東海〉 

静岡市 

静岡谷島屋 

0542-54-1301 

" 

江崎書店 

0542-54-4481 

// 

吉見窨店 

0542-52-0157 

// 

戸田書店 S B S 店 

0542-8 卜 5733 

〃 

戸田書店曲金店 

0542-81-5899 

泪津市 

吉野屋 

0559-23-5676 

ガ 

マルサン窬店宝塚店 

0559-63-0350 

窗士市 

戸田 害 店富士店 

0545-5 卜 5121 

清水市 

戸田耆店本店 

0543-65-2345 

浜松市 

浜松谷島屋 

0534-53-9121 

名古屋市 

星野書店近鉄ビル店 

052-581-4796 


MS-DOS いたれりつくせり本 •_ 円 
プレイ MS-DOS •_円 

UNIX System V 

プログラマ•ガイド • 12000円 

UNIX System V 

ユーザ•ガイド •9800円 

C 言語の活用理解 wooo 円 

C 言語の基礎知識 • 2500 円 

C 言語の応用50例 w 3 。。 円 

C プリプロセッサ•パワー *2200 円 
Play the C 上巻 •■円 

Play the C 下巻 •_ 円 

8086アセンブリ言語 *28〇〇円 

8086マクロプログラミング w 咖円 
ビギニング MUMPS •2600円 

マシン語マジックブック II *2500^ 

マシン語プログラミング 

亍 クニ、リク• 2 〇00円 

巳 ASIC によるプログラミング 

スタイルブック*1 8 〇〇円 


展示図書一覧 


ソーティング•ノート 

• 1900円 

巳 ASIC プログラム 


ジェネレータ集 

• 2800 円 

98/88スモールビジネス 


プログラム集 

♦2500 円 

88デスクアクセサリ集 

_ 2000円 

IDOS 活用八ンドブック 

• 2700 円 

DISK CHARGE 追補版 

• 1800円 

フロッピーディスク 


フル活用ガイド 

• 2300 円 

PC 工作入門 

• 1800円 

試験に出る X 1 

• 2800 円 

XI テクニカルマスター 

籲2500円 

XI システム研究室 

• 2500 円 

新松ガイド 

• 2000 円 

一太郎 Ver .3 ガイド 

• 2500 円 

新一太郎ガイド 

• 2300 円 

一太郎ガイド 

• 2000 円 

桐 Ver .2 ガイド 

•2500 円 

花子応用ガイド 

• 2500 円 


Lotus 1_2-3ガイド •誦円 

RD 巳ファラオガイド • 2900円 
ビジュアルラーニング R □巳 •2500円 
アセンブラ CASL 入門 mooo 円 
八ードウエア徹底マスター •2500円 

FORTRAN 徹底マスター 參 2800円 
特種情報処理試験 
総整理と徹底対策 •咖〇円 

情報処理の基礎知識 •_ 円 
ワープロ文書 F«OP • 1200 円 
新聞記事八イテク切抜き法0円 
バイト S ワードの風にのって •_ 円 
ワープロ考現学 • 1200 円 

電子ゲームの「快楽」 •⑶〇円 
ムーグ•ノイマン•バッ八 •'300 R 
闩 PG 幻想事典 か 500 円 

新明解ナム語事典 •soooR 

保存版 GS 倶楽部 •■円 


市市市市市市市市市市«>市 市市 市市市市 
////〃橋崎谷0#卑垣//児 0 m 鹿都//"〃良阪////////""//////方槻§ 戸 

豊岡刈春岐大可津四鈴 < ift 京 奈大 枚 K 東神 










そ①節に—, 

MMM 機能をもりもりと料理 


XSZ 7 の美味しい 


絶賛発売中 


榭刷出来！ 


試験に出る 


DSHI3BE3SE9BD9BHB 

祝一平著 


巳5判定価2,800円 


Oh ! MZ(1985 年6月号〜1987年8月号）に連載されたあ 
の祝一平氏の「試験に出る^7」がついに1冊の本とし 
て完成しました。本書では X1/Xlturbo シリーズの ハード 
ウェアをくまな〈探検，筆者独自の解析術と豊富なオリ 
ジナルプログラムで 数々の機能を料理していきます。連 
載時の内容に XUurboZ の機能（第14章）を加筆，その他 
の章についても全面的に新情報を取り入れて再編集いた 
しました。さらに巻末には付録として「XI処理技術者 



八ードウエアのフルコー: 


発行 

株式会社日本ソフトバンク出版事業部 


内容 

第0章吉っと完全無欠な I / O マップ 
第1章 CRTC でどすこいである 
第2章 PCG は二度おいしいのである 
第3章漢字名野出亜留 
第4章サブ CPU のおかげなのである 
第5章 CTC は律儀なのである 
第6章 SIO でマウスである 
第7章通信だってするのである 
第8章 DMA はへビー級である 
第9章ディスクを回すのである 
第10章 PSG は基本である 
第11章 FM 音源ナ八卜厶ジーク 
第12章カラーイメージボードで取り込むのである 
第13章テープもやってしま5のである 
第14章 Z の機能はおいしいのである 

特別付録 XI 処理技術者試験 




日本ソフトバンク 


試験」も収録しています。また，現在 Oh! x 掲載のミュ 
ージックプログラムで活用されている FM 音源用 MML は 
XI ユーザーの 必須アイテムと言えるでしよう。 


XI シ」ーズ 

XI turbo Z 


試験 C 出51^7 


祝一平著 


SOFT 


〒102東京都千代田区九段南 2-3-26 003(261)4095 

















SG ソフトウェアライブラリー 



16ビット用最新、自動/一括/連文節変換システム Katana (刀)の完全移植。143万種にも及ぶ多彩な文字表現: 1 本格的データ 
ベース、表計算機能搭載。16ビットワープロソフト、データベースソフトなど MS-DOS 上で動くソフトとのデータ互換*。 2 その他すベての 
機能が16ビット用に開発されたパーツ群により構成。フルスペックでなおかつ超高速。 

*丨.文字サイズ.文字種.文字の位■•網かけ•下線•カラー投定の組みあわせによる計算。 *2. MS - DOS とのデータ交換は 2 HD 版のみ。* MS - DOS はマイクロソフト社の登 li 商樺です。 


Katana (刀)が自動•一括•連文節変換実現。 

サムシンググッドが16ビット機上で開発 
した変換システム Katana (刀）を8ビット 
機用にコンバート。8ビットで初めて自動 
変換•一括変換•連文節変換を可能に 
しました。右の写真のような文章も一気 
に漢字力 1 なまじり文に変換しま1~。 

しかも Katana (刀)の大きな特長は、品 
詞分類のきめ細かさと、独自の評価点 
数法を確立したこと。品詞をこれまで'の 
倍以上(当社比)に分類し、かつ文節と 


力-ド型デ-夕べ-ス機能、表計算機能搭載。 

住所録、名刺管理、カセットライブラリー 
など使いみちタツプリのデータベースと、 
行内 • 列内 • 行間 • 列間と多彩な計算 
が可能な表計算機能を搭載。 




文節のつながり方の妥当性を評価点に 
よって判定することにより、既存の16ビツ 
トワ ー プロソフトにも勝る高い変換効率を 
誇りま to 

•縮小表示も可能です。 

oncmsai EQ»iuisLiuiu« aim 

: rcrri ■證 

■ mV ” j 


超多機能日本語ワープロ 



他の追従を許さぬ文字表現力。 

文字のサイズは、1/4角から横4倍縦2 
倍角まで15種類。すべてのサイズの文 
字を、強調文字、白黒反転文字、斜体文 
字、袋文字に変換することが可能。これ 
らの機能は、漢字•かな•記号など文字 
の種類を問いません。 

多様な用紙への印刷が可能です。 
はがき、原稿用紙、タック シールへの 印 
刷を簡単に行うために専用の用紙設定 
を用意いたしました。 




SHARI 
SHARI 

•本商品は XI では 

2□版、 2 H □版ともに ¥34,800 


«^ん2^専用 2 HD 版 
-シリーズ対応2□版 

S 品は XI ではお使いいただけません。あらかじめご了承ください。 


人を大切にするテクノロシー 

株式会社サムシングクソト 

【大久保 2-5-20 シティプラザ新 ? 83F TE し 03(232)0801 ( 代表） 


• Shogun (将單)の面面デザイン•仕様等は改良を目的に予告なく変更する塌合がございます。あらかじめご了承ください。 

* Sho g un (将軍)は、フロッピーの種類およびハードウェアのメモリ容量によって機能に遒いがあります。あらかじめご了承ください。 

く既戦力 > Xlturbo シリーズ用をお使いの方は Shogun (将軍) への システムアップサービスがございます。くわしくは弊社営業部までお問いあわせください。 


〒 160 柬京都新锚区大久保 2-5- 
* 資料のご»求は右の券を切りとり上記の弊社営業部宛までお送りください。 
カタ a グ等お送りいたします。 





蓮 


本物かどぅかが 
超多機能の条件 

























超高速の 



A し 7 • 入乙 > ^fcg/ffog7 用 

SURER DEVKCE 


获出現/ 



詹■韶 魏 j 

MONITOR “T” 


BLUE SKY はコンピュータ通信にオブジェクトデータの橋を架けましだ。今迄は RS -232 C でオフジェ 
クトデータを通信する時は， アスキー データに変換して行っていたコンピュータ通信を，直接オブジェクトデータ 
のままで，しかも，特殊なデータ圧縮を施して，今迄にない超高速で通信する事が出夹る XZT 7 turb 。 馳 
『SUPER DEVICE MON I TOR “ T ” 』を開発しましだ。既に好評発売中の1112?用の 『SUPER 
DEVICE MONITOR “ T ” 』とは RS -232 C により双方向の超高速通信が出来ます。 

エディト機能も呼び出しだセクターを豊富なコマンドを使ってワープ□感覚で自在に変更•書き込み等のデータの 
編集が簡単に出来ます。アクセス出来るディバイスも八ード•ディスク， MS - DOS や HBSOOO で使用している 
フォーマツトの 2 HD のディスクなど各コンピュータに接続されだ殆どのディバイスをエディトする事が出来ます。 


★任意のディノ X イスから他のディ 
/ \イスへセクター単位で高速転 
送が出来る。 

★任意のセクターをほぼ瞬間的に 
縦 .横チェックサムとキヤラク 
ターダンプ付き表示が出来る。 

★エディット機能はワープ□感覚 
で表示しだセクターのオブジェ 
クト • データを1バイト単位で 
変更 • 複写等多彩なエディト機 
能を備えている。 

★ tt / n&o 内の BIOS 用 ROM 
や twnboZii 標準装備の内部 
増設メモ U —にも直接アクセス 
出来る。 ( turbo ( D み) 


★任意のディ/ \イスの複数のセク 
ターを他のディバイスと比較 • 
照合が出来る。 

★キャラクターダンプは漢字の表 
示も出来る。 （ X 7 は除く） 

★ RS -232 C のボーレートの 
変換はボタンーつで切り替えら 
れる。 

フオーフツトや 1112 ? フオ 
ーフツトのディスクがアクセス 
出来る。 

★ USSO 00や MS - DOS 

フオーフツトのディスクにもア 
クセス出来る。 （ tunbo のみ） 


★2 5 5バイト迄のデータを任意 
のディ/ \イスの複数のセクター 
から検索する事が出来る。 

★キャラクターダンブで表示出来 
る漢字には区点 * JIS の表示 
も出来る。 （ tunbo のみ） 

★ 2 H D 及び2 D D のディスクも 
アクセス出来る。 （ tunbo のみ) 

★ RS - 232 C を使つして他の 
コンピュータとの間で相互に特 
殊なデータ圧縮法に因り複数の 
セクターのオブジェクト_デー 
夕を通常の最高3 2倍(理論値） 
の超高速での転送が出来る。 

(/ブは除 <) 


SUPER DEVICE MONITOR “ T ” ^ XT7 5” 2 D 10,000円 

( tunbo 用の 2 HD は受注生産） 5 b 2 D /2 HD 13,000円 

1112?■留屋 3.5" 2 DD 13,000円 


□ードに長時間かかる多分割のテーブ版のゲームがボタン操作一つで何本も 1 枚のディスクに整理が出来て表示 
しだリストから遊びだいゲームを指定すると一瞬で□ード出来る 『EXTRA HYPER + ひ』 もあります。 

EXTRA HYPER + a 3，， • 5 B 

■11 Z •固 EKB ® •匿匿®®•藍 1 EXS 3.5〃 • 5〃 各 14,000円 

►お求めは全国の有名マイコンショップでどうぞ。 株式会社 BLUE SKY 

通信販売をご希望の方は当社へ直接、商品名.機種名•メディア名.住所 〒411静岡県三島市加茂16 - 4 

氏名•電話番号を明記の上、現金書留にてお申し込みください。（送料無料） Q 0559-72-6710 







































BASIC HOUSE で 68000 CPU が大流行 = 


SHARP 



X 68000 ㈡ ニクノなレーション) 

X 68 スーパーコブラ n 

2 MB パージヨン 

本体(増設メモリ内蔵） 
専用ディスプレー 


標準価格 

¥530,800 


起特価 


SHARP 




X 68000 ACEHD 

20 MB ハードディスク内蔵版 




本体 CPU 
専用ディスプレー 
チルトスタンド 
標準価格 

¥525,400 


Apple Macintosh Plus. 




漢字 Talk Ver .2.0 
2 MB メモリ内蔵 


標準価格 

¥428,000 


二 wwrcy puyr 、 cm： 
み "も p =9 t . 


起特価 

20 M ハードディスク付 


V ノ 

長期クレジット OK 送料2,000 


\ y J 

長期クレジット OK 送料2,000 


V _ _ノ 

長期クレジット OK 送料2,000 






XXB8000 


オリジナル八ードウェア•ソフトウェア新製品 
■想 k 織 a ぜ織通 


新発売.グ 


型番 

KGB - X 681 MB 
1 MB 增設メモリ 
• ACEHD 版等は使 
用できません。 


型番 

KGB - X 68 PRK 

数値演算プロセッサ 
4 MB 增設 RAM ボード 
春数値演算プロセツ 
サはソケットのみ增 
設メモリーは1 MB 実 
装。 


型番 

KGB - X 68 ADC X 
12 Bit 16チヤンネル 
高速 A / D コンバータ 


型番 

KGB - X 68 PIO 
16 Bit input 
16 Bit output 
高級絶縁型 PIO 
サンプルソフト付 


型番 

KGB - X 68 DAC 
12 Bit 4チヤンネル 
高級 D / A コンバータ 


定価 ¥32,000 定価 ¥58,000 


サンプルソフト付 

定価¥128,000定価¥68,000 


サンプルソフト付 

定価 ¥118,000 


• B 6-6305. ¥6,800 

C 言語ライブラリー （ XBASIC 用） 
B 6-6301 をお持ちの方はどうぞ！ 

• B 6-6306. ¥14,800 

BASIC 拡張関数パッケージ C 言 
語ライブラリー付 

• KGB - X 68 UNB . ¥6,800 

X 68000 用ユニバーサル基板 
金メッキ•スルホール•カードプラー付 


BASIC HOUSE 才 1 J ジナル 


X 68000 シリーズ 


• B 6-6301. BASIC 拡張関数ノ、。ッケージ ¥9,800 

• B 6-6302. CP / M 68 K エミュレーター ¥19,800 

• B 6-6303. アイコンエディター ¥4,800 

• B 6-6304. ディスクキャシャー ¥6,800 

• KGB - X 681 MB .1 MB 增設 RAM ボード（内蔵用）¥32,000 

MZ シリーズ 

• KGB - MZ 1 . 超低価格計測制御ボード¥15,500 

• KGB -128 KMZ . MZ - 2500用增設メモリポード ¥9,800 

籲ファミコンクリエーター . MZ -2500 専用ファミコンソフトの解析ツール¥25,000 

XI/XI turbo シリーズ 

• KGB - X 1 S . 低価格アナログデジタル入出カボード ¥19,800 

• KGB - HD 1 /F . XI turbo 専用ハードディスクインターフェースボード¥16,000 

• KGB - P 10.. 高級絶縁型パラレル入出カポード¥42,000 

• KGB - AD 12. 高級 16 ch 12 Bit A / D 変換ボード ¥118,000 

修 KGB - DA 4. 高級 4 ch 12 Bit D / A 変換ポード ¥98,000 

• B 6-3301. PC 98 ㈠ Xlturbo 相互ファイルコンバーター¥4,800 




XI .1 turbo 用 GP - 旧インターフェースボード 

型番 KGB -4 B 8 (マニュアルソフト付） 

定価 ¥58.000 


X-MAC World Expo in NIKK0 開催 


SHARP X68000 と Apple Macintosh 

ユー ザー ズク、' ループの 合同コンパ 
全国の好者が集まり、夜通し遊んでしまう。 

開催予定日昭和63年7月30日出 *31 日⑻ 
会場 奥日光高原キャンプ場 

会費 ¥10,000 

内容 

• X 68000 関係セミナー(テーマ募集） 

# Macintosh 関係セミナー （ Hypowercard ) 
•パブリックドメインソフト大集合 

• 自作ソフトの交換会 

定員40名ですのて、御早めに!！ 


全国どこでも発送可長期クレジット OK 送料全国均一¥1,000宅配便にて即日配送 


せ計测技研 本社営業部/マイコンショップ/通販部宇都宮市竹林町 503—1 TEL 0286-22-98 I 1 FAX 0286-25-3970 
マイコンショップ rrwfflw お申し込み•お問い能は ^ 0286 - 22 ' 981 im 







































































サ、一才、 ー ナスセ ー ，レ突入/ 

-7月31日まで 

本体志志愈るん T * ZONE で/ 


HBJII 


一 

CZ-B01Q^ 


みィ 
一;？^ 


あの C - TRACE が 
XJBBOOO に登場 
大好評発売中/ 

C-TRACE68K 

¥msoa 


ターゲットは OSK 


_ ITZONE おすすめ OSK 対応セツト-! 

CZ -611 C + アナログマルチスキヤン CRT ¥399,的0// 

(このセットではカラーイメージ ユニッ トはお使いになれません） 


〇ミドヵぐ出るのに- 

C={][DJ くらい無く T ど勹す3/ 

•ボーナスて軽〜く買えて i T . ZONE ； r /、 スメ HD . 
® NEC 製 H □を使用した高信頼 20 M 巳 ( B 5 mS ) Best Price / ¥ 84,800 . 

©超高速シーク、 28 mS キャラベルの 20 M 巳 Best Price / ¥ 94,800 
◎大容量 40 MB しかも 40 mS キヤラベル 40 L Best Price / ¥128,000 


0S-9/68000 for H 68000 

OSK の特長はそのままに CD - RTOS ライ 
クなユーザーインターフェースを載せて 
近日登場 


T-ZONE 2F 


籲マイコン a 明 利用の方へ：現金書留て送金される際は、注所、氏名、 tel 番号.希 a 商品名 （» しく）を明 k して下さい拫込を御希*の方は下 ie 银行へお肋いします 
尚、いずれも予め TEL にて、御予約•送料確認の上御送金下？い（振込口座埯玉餌行秋 葉/* 支店当座2705 ㈱ S 土 電子工業） 


宇都宮店：》02昍 （63)4949 川口 店： 00482 (68)7826 横浜店： 0045(641)7741 


空 re :代门燃仰 〉 ifni 






夏休み勿宿題に!7 
XKB 日000 

ユニバーサルカード ¥4.500 


T.ZONE のユニバーサルカードには次 

のような特®があります 

丨.ディジタル/アナログ両用の 
ソドックスな蛇の目バタ 

2. • ' をワンタッチ 

な專用ランド。 

3. プローブの GN0 をとり 
GND バターン❶ 

4. 半田のりの良い口 
両面スルーホー 

5. 部品面がすぐわかる脱切な 
ーサイン。 

6. コンタクトは高信»の金メッキ端 
子. 


兩用の 
ター 

，切な 




DNE ティ-. 


ゾーン 


Micom Zone 

IF 〒1〇〗東京都千代田区外神田 4-4-1 ar 257-2650 


ポーナスは安全、確実、高利回りの " PZONE へ 


双！]ユーザーには… 

■ M| Southern Pacific 版 

ML MODULA-2 


CP/M80 ¥16.800 MS-DOS¥19.800 
★ Modula-2 なら FTL です / 

铱必とに Mod«k23 功の叉クン r- t,r 1 1 •た nx 
をあなた t おス t にな”ませんか？ 

MS-DOS»ll，ー ジモヂル KW サボ ーf t U ') i l ■た. 


和文化/ 


お待たせいたしました。以下の两品が和文化しました 

Small Talk V.Turbo Tutor. dBXL 


日本じや 7 ウス t 住宅難 

MOU 葬屬 


特価 ¥4,800 


キーボー ドだけのスペースでマウ 
スが 使用できます。テンキー部が 
かくれないので Kamikaze 等に最適,， 


0 S -9 はマイクロウエア社の登録商標です。 

下記各店でも取り扱っております。 




























































































































営業時間 


AM10:00 〜 PM7:00 

(日曜•祭日は PM 6: G 0 まで) 


年中無休 


当店は X 68000 の認定店です。 
どんなことでも安心してご相談くだ 
さい0 

★ X 68000 をお買上げのお客様にも 
れなくテレホンカードとゲームソフト 
(アルカノイド)をプレゼント中/ 



START 


お好きな組合せ 
でどうぞ0 


プロフェッショナル^タイプ 

XKBBOOO ACEaa 

• CZ -6 11 C-GY …¥399,800 

新製品 • 20 M ハードディスク内蔵// 


ディス プレイ 

• CZ -601 D-GY . ¥119,800 

ピッチ 0.39 •アナログ対応 


周辺機器•ボード 


> CZ -611 D-GY . ¥145,000 

ピッチ 0.31 •アナログ対応 

> CU -15 M 1( E * B ) ••…¥ 99,800 

ピッチ 0.39 •アナログ/デジタルモニター 


• CZ -8 PK 7. ¥122,000 

80桁ドットインパ外プリンター 


> CZ -8 PK 8. ¥152,000 

136桁ドットインノマクトプリンター 


ICZ -8 PC 2. ¥ 69,800 

80桁熱転写プリンター 


• CZ -6 BE 1. ¥ 35,000 

1 MB 増設 RAM ( CZ - 6000用） 


★その他いろいろあります。お電話で! 


組合せのほんの y 例 

名づけて 

• 0 Z «601 C ( E •日)本体+キーボード…¥319,800 

• GZ -601 D ( E . B ) デ<スブレイテレヒ V 119,800 

• CZ -6 ST 1( E •日）チルトスタンド…¥ 5,800 

•スペー•スハリアー . ¥ 6,800 

•源平討魔伝 . ¥ 7,800 

❿ XE -1 PRO (ジョイスティック） ……¥ 9,500 


GOAL 


さあ、ご注文、お問合せは今ス 
グお電話で/お支払いは超低 
金利のクレジットもご利用で 
きます。お気軽にご連絡くだ 
さい0 


ソフト PARTS 


■定価合計- • 


• ¥528,700 


Q 03-4 BB - B 541 


均等払い 

ボーナス 

¥17, 140 x 18 回 

¥30,000 x 3回 

¥ 12,900 x 24 回 

¥ 25,000 x 4® 

¥ 8,650 x 36回 

¥ 20,000 x 60 


ソフトや八ードの内容や発売 
日等のおたずねにも親切にお 
答えします。 


籲 X し ink 68 . ¥19,800 

時代はパソコン通信だ/ 

• ミュージック PRO -68 K . . . ¥ 18,800 
•サウンド PRO -68 K •…¥15,800 

_ミュージック関係ならこの2本/ _ 

•サンプリング PRO -68 K "¥ 17,800 

POM をフル活用するならこれ/ 

• C - TRACE 68000……¥68,000 

本格的レイトレーシングツール 


ソフト PART ! 


•日本語ワープロ EW . …¥ 38,000 

フロントプロセッサ E 1 搭載ワープロソフト 

• WINDEX PRO -68 K V 28,000 

コンパイラと来たらエディタです。 

參 Kamikaze . ¥ 68,000 

忘れちゃいけないビジネスソフト 

• Z ,s STAFF PRO -68 K - V 58,000 

プロフェッショナルグラフィックツール 




ソフトも周辺機器も紹介しきれないぐらい豊富です。くわしくはお電話で/ 


\^=1 」 ， turMiaH 


迎 in 


クリエイト特典- 

_全商品完全保証害付(メーカー保証） 

•全国無料配逹(一部離島の方は有料になります） 

•配速日の指定 OK (日曜•祭日にかかわらずお客様のご 
都合にあわせて配達します） 

•どんな商品の組合せも自由自在（ご予篆用途に応じ 
自由自在にシステムアップできます） 

#中古パソコン高額下取 （今お使いのパソコンを わずか 
な差額でグレードアップ） 

#お支払い方法自由(低金利の均等払、ポー ナスー 括払 
もご利用下さい） 


籲 CZ-881C-BK 本体+キーボ-ド. •¥ 179,800 

• CZ.0D-BK デイスブレイテレビ..¥109,800 

• CZ-6STIB チルトスタンド……¥ 5,800 

• AN-160SP アンプ 内蔵 スピーカー.¥ 59.800 

• ブランクデイスケット-¥ 4,500 


• CZ-830C-BK 本体+キーボード.¥99,800 

• CZ*830D*BK ディスプレイテレビ…¥ 98,000 

#CZ-6STIB チルトスタンド . ¥ 5,800 

•上海(ゲームソフト)——…¥ 4,500 
•ブランクディスケット . ¥ 4,500 

■定価合計 . ¥359,700 


■定価合計 . ¥212,600 


大特価周辺機器(各ケーブル付ぎ） 



夏のパソコン祭り 7/8_〜7/10旧） 

1. 各社パソコン、ワーフロお祭り特価セール/ 

2. ゲーム B ビジネスソフト大幅値引き/ 

3. 特別高額下取りセール/ 

4. フロッピィ、マウス等サプライ用品大特売/ 

5. 各社プリンタ、 HD 等周辺機器大特価セール/ 


パソコン専門ショップ 


品石 

定価 

機能 説明 

ITH -320 S 

¥■^5^00 

20 M ハードディスク平均シークタイム 28 ms 以下 

ITH -520 N 

¥^80 U 

20 M ハードディスク平均シークタイム 65 ms 以下 

ITH -540 S 


40 M ハードディスク平均シークタイム 38ms 以下 

VP -800 

¥mm 

80桁シリアルプリンタ 


総合お問合せ先® 03-486-6541 代) 


)J3hOUIr¥h 渋谷/横浜 


籲渋谷店 ©03-486-6541( 代) 


〒彳50:東京都渋谷区渋谷卜 12-7 三和渋谷ビル 
振込銀行:協和銀行渋谷支店® No 239313 


籲横浜店 sQ 45-314-4777( 代) 


〒221: 横浜市神奈川区鶴屋町 2-12-8 第1建設ビル 
振込銀行:三和銀行横浜駅前支店 ㊣ Na 310852 



















































































































XlturboZII I XIturboZII I XIturboZ 


XI turboZ 



XlturboZ の本格派 
セット 0 TV 付 2 モード 
オートスキヤンデ f スプ 
レイ0 

CZ-88IC-V 179,800 
CZ-88ID ¥ 109,800 
合計 . ¥289,600 

特価 ¥203.000 

お支払例 @¥ 10,520+¥ 7,600 X35 回 
@¥ 7,900+ ¥ 6,000 X47 回 



NEW-Z BASIC の搭 
載で AV 機能をサポー 
卜、充分に楽しめるそ； 


CZ-88IC …179,800 
CU-I4BD-Y 64,800 
合計 . ¥244,600 

特価 ¥102.000 





-SB6n 


高級日本語ワープロ 
「窨院28」搭載、 MS - 
D 0 S と融合しスビー 
ディな実務。 

MZ-286I •¥328,000 

MZ-ID26-V 89,800 
合計 . ¥417,800 

特価 ¥302,000 

お支払例⑩ ¥14,580+ ¥11,700X35 回 
@¥ 12,200+V 9,200 X47 回 


お支払例 ®V 7,080+ ¥ 6,600 X35 回 
©¥ 5,200+¥ 5,200 X47 回 


2531 


今よりもなおハイグレ 
ードに、とお考えの方 
に…更に可能性を拡 
大する。 

MZ-253I-- V 199,800 
MZ-ID22-•• V 108,000 
合計 . ¥307,800 

特価 ¥238,000 
お支払例 11,620+¥ 8, 100X35 回 
©Y 8,600+ ¥ 6,400 X47 回 



NEW-ZBASIC は後 
で買えばいい。 
ハイグレードモニタを 
セットして驚異の価格 c 

C2-880C-- ¥218,000 
CZ-880D--Y 109,800 
合計 . ¥327,800 

特価 ¥108.000 
お支払例 @¥ 9,120+ V 6,400 X35 回 
®¥ 9,400+ V 5,000 X47 回 


MZ をこれから使う方、 
少々ぜいたくですが是 
非お勧めしたいセット 
です。 

MZ-2520 -V 159,800 
MZ-ID26 - -Y 89,800 
合計 . ¥249,600 

特価 ¥204,000 

お支払例 ®v 7,960-1- V 7,000 X35 回 
©¥ 6,7004- V 5,500 X47 回 




名機 XlturboZ が更 
に安くなリました。 

2モードデイスプレーと 
の 組合せ。 

CZ-880C … Y 218,000 
CU-I4B[> - V 64,800 
合計 . ¥282,800 

特価 ¥103.000 

お支払例⑬ ¥ 8,040+¥ 7,500 X23 回 
@¥ 7JZ0+Y 5 r Z00X35® 


HE システムを搭載、 
最上級ゲーム根とパ 
ソコンが合体。 



CZ-830C …¥ 99,800 
CZ-830D- •¥ 98,000 
合計 . ¥ 197,800 

¥100.000 

お支払例 5,900+ V 5,500 X35 回 

©V 5,900+ V 4,300 X47 回 


X1Gmodel30 

X1Gmodel3Q 

XI G model lO 

| XlFmodeMO 



X 1 G の本格派セット 
FDD 2 基内蔵、専用 
カラーモニタは TV に 
も使用可能。 

CZ-822C …118,000 
CZ-820D -- Y 79,000 
合計 . ¥ 197,000 

特価 ¥109.800 

お支払例 @¥ 7,664+ ¥ 5,300 X23 回 
©¥ 6,652+ ¥ 3,700 X35 回 



こちらはモニタまで予 
算がまに合わない方、 
RFU ンノ'{一夕付•きで 
家の TV で 〇 

CZ-822C …. Y I18,000 
AN-58C •…V 2,980 
合計 . ¥ 120,980 

特価 ¥09.800 

お支払例 ©V 7,078 + V 6,400XII 回 
©Y 4,164 + ¥ 3,400 X23 回 



FDD も欲“、、レコー 
ダも使いたい、予算が 
10万以下ならこのセツ 
卜をお勧めします0 

CZ- 8200-V 69,800 
CZ- 820D-V 79,000 
CZ- 503F- V 49,800 
合計 . V 198,600 

特価 ¥04.800 

お支払例 ©V 6,064+ ¥ 4,600 X23 回 
©V 5,552+¥ 3,200 X35 回 



とりあえず BASIC を 
覚えてデ f スクソフトで 
遊ぶのは後まわし、そ 
んな君へのセット。 

CZ-8IIC- ••¥ 89,800 
CU-I4G ••…V 49,800 
合計 . V 139,600 

¥59,800 

お支払例 ©V 7,280+ V 6,500X 9 回 
®¥ 4,768 +V 3,400X 19 回 


型番 

CU - I 4 GE 

CU -»4 BD 

CU - I 4 A 4 

CU - I 4 AD 

CU - I 5 MI 

CZ -820 D 

CZ -880 D 

CZ -60 ID 

CZ -6 IID 

CZ -520 F 

CZ -502 F 

CZ -503 F 

CZ -6 BEI 

CZ -6 BE 2 

CZ -6 BE 4 


品名 

ディスプレイ 

ディスプレイ 

デイスブレイ 

ディスプレイ 

ディスプレイ 

デイスブレイ 

ディスプレイ 

ディスプレイ 

ディスプレイ 

FDD (2 HD /2 DD ) 

FDD (2 DD ) 

FDD (2 D ) 

I MB / 增拉\ 
2 MB RAM 
4 MB \ボードノ 


標準価格 

V 49,800 

V 64,800 

V 89,800 

V 84,800 

V 99,800 
¥ 79,800 

V 109,800 

V I 19,800 

V 145,000 

V 11 8,000 

V 99,800 

V 49,800 

V 35,000 

V 79,800 
V 138,000 


販売価格 

V ? 9,800 

¥ ? 8,000 

V ? 3.000 

V ? 8,000 

V ? 7,000 

V ? 6,000 

V ? 3,000 
¥ ? 3,000 

V I ? 3,000 

V ? 2,000 

V ? 8,000 

V ? 8,000 

V ? 8,000 

V ? 2,000 
¥ l?8 # 000 


お支払例 

V 3,278 X 10 回 

V 5,280 X 10回 

V 3,371 X 18 回 

V 3, 689 X 18 回 

V 3, 786 X 24 回 

V 3, 465 X 15 回 

V 4,081 X 24 回 

V 3,203 X 36 回 

V 3, 892 X 36 回 

V 3, 169 X 36 回 

V 2, 687 X 36 回 

V 3, 515 X 12 回 

V 3,080 X 10回 
¥ 3,944 X 18回 

V 3,720 X 36回 


型番 

CZ -620 H 

CZ -8 PC 2 

CZ -8 PK 5 

CZ -8 PK 7 

CZ -8 PK 6 

CZ -8 PK 8 

CZ -8 PD 3 

CZ -8 NSI 

CZ -6 VTI 

CZ -6 PVI 

AN - I 60 SP 

CZ -8 BSI 

CZ -6 BNI 

CZ -6 BUI 

C 2-6 BGI 


品名 

HDD 

プリンタ （ 80斯） 
プリンタ （ 80桁) 
プリンタ （ 80 W ) 
プリンタ（136桁） 
プリンタ（136桁） 
ブリンタ 

カラーイメージスキャナ 
カラーイメージユニット 
カラー ビデオプリンタ 
アンプ内* スピーカー 
FM 音源ボード 
スキャナ用バラレルポード 
ユニバーサル 10ボード 
GP - 旧ボード 


標準価格 

V 178,000 

V 69,800 

V 129,000 

V122,000 

V 159,000 

V IS 2,000 

V 59,800 

V 188,000 

V 69,800 

V 198,000 

V 59,800 
¥ 23,800 

V 29,800 

V 39,800 

V 59,800 


販売価格 

V I ?2,000 

V ?4.000 

V I ?0,000 

V ?4,000 

V I ?3.000 

V I ?7,000 
¥ ? 6,000 
¥ 1?0 # 000 

V ?6,000 

¥ I ?4,000 

V ?8,000 
¥ ?9,800 
¥ ?4,000 

V ?2,000 

V ?8,000 


お支払例 

V 3, 846 X 48 回 

V 4, 995 X 12 回 

V 3,444 X 36 回 

V 3, 238 X 36 回 

V 3.331 X 48 回 

V 3, 169 X 48 回 

V 3, 465 X 15 回 

V 4,063 X 48 回 
¥ 3, 562 X 18 回 
¥ 4, 171 X 48 回 
¥ 3,053 X 18回 

現金一括払 
現金一括払 

V 3,520 X 10回 

V 3,053 X 18 回 


型番 

CZ -6 BFI 

CZ -6 BPI 

CZ -6 EBI 

CZ -8 TMI 

C 2-8 TM 2 

CZ -2 I 3 MS 

CZ -2 I 4 MS 

CZ -2 I 2 BS 

CZ -2 MLS 

CZ - I 4 ISF 

C 2- I 37 SF 

CZ - I 33 SF 


品名 

增段 RS 232 C ボード 
ブ〇セッサポード 
I / O ボックス 
モデム 
モデム 

MUSIC PRO -68 K 
SOUND PRO -68 K 
ビジネス PRO -68 K 
(デコンパイラ PRO -68 K 
NEW-Z BASIC 
turbo 2 f s STAFF 
モデムターミナルソフト 

Z . STAFF PRO -68 K 

kamikaze 

Shogun 


標準価格 

V 49,800 

V 79,800 

V 88,000 

V 29,800 

V 49,800 

V 18,800 

V 15,800 
¥ 68,000 
¥ 39,800 

V 18,800 

V 19,800 

V 25,800 

V 58,000 

V 68,000 

V 34.800 


販光価格 

V ?0,000 

V ?4,000 

V ?8,000 

V ?5,000 

V ?9,000 

V ?5,800 

V ?3.800 

V ?4,000 

V ?2.000 
¥ 75,800 
¥ ?6,800 

V ?1.000 

V ?7,000 

V ?5,000 

V ?0,000 


お支払例 

V 3,013 XI 5 回 

V 3, 147 X 24 回 

V 3, 343 X 24 回 
現金一括払 

V 3,608 X 12回 
現金一括払 
現金一括払 

V 3,435 X 18 回 

V 3.520 X |〇回 
現金一括払 
現金一括払 
現金一括払 

V 3,541 X IS 回 

V 3, 499 X 18 回 
現金一括払 


I麵％3愼 


:]至新宿 


〇 


ご販◦売フご機通信 



'IS® 


電波ヒル 


外堀通り 


miij ピナ 


中央通*〇 


AVC フタ /V 取後本孔 
□日通 ビル 


! [>w キワ 


至上野1 


03(253)7661 


111 n j t 秋葉原职 n 

AVC フタバ電機 

亍101東京都千代田区外神田 2-9-8 
神田 ユニオンビル 003-253-7661( 代） 


仙台 022-264-3704 


今すぐもよりの電話から 


札幘 011-61 卜5104 新瀾 0252-75-4175 


名古牖 052-452-3871 


大阪 06-31 卜3931 


広 ft 082-295-6873 


福岡 092-481-2494 


X68000 ACE-HD I X68000 ACE HD I X68000 ACE HD I XBSOOO ACE 



ドットビッチ 0.31 mm の 
モニターを セット 20 M 
HD 搭載の超高級セ 

ット〇 

CZ-611C -V 399,800 
CZ-6IID--Y 145,000 
合計 . ¥544,800 



強力な日本語処理と 
実装密度を追求して信 
頼性、更に向上。 


CZ-611C- -¥399,800 
CZ-60I ••…¥ 119,800 
合計 . ¥519,600 


特価 ¥404.000 1 特価 ¥404,000 



お支払例 @¥16,660+¥14, 900X35 回 
⑬ ¥ 14,300+¥ 11,700X35 回 


お支払例⑬ V 16,360+¥ 14, 200X35 回 
©¥11,800+ ¥11,200X47 回 


更に夢を拡大、 20 MB 
HD の搭載。最大に能 
力を引出す3モードの 
デ イス プレイ 0 

CZ-6IIC--V 399,800 
CU-I5MI • V 99,800 
合計 . V 499,600 

特価 ¥42] 0,000 

お支払例⑬ Y 16,500+ y 13,700 X35 回 
©V 12,400+ ¥ 10,800X47® 



CZ -600 の後継直接 

アクセスできるメモリー 
が 16 MB もある優れも 
の。 

CZ-60IC-Y 319,800 
CZ-60ID--Y 119.800 
合計 . ¥439,600 

特価 ¥303.000 

お支払例⑯ ¥ 14,220+¥ 12, 100X35 回 
©V 12,400+ V 9,500 X47 回 


頭金しフレ9、ソ 

カレッジクレジヅト怒^為 

iuti mq 通常の場合、当社に申込■が到着後 ia 闉以内。特に人気のある商品で品薄の場合, 

flrj 少^?納期 xf 遅 n る場合ちありますので御了承下さい。 

製品先取りぉ支仏いは W 卜 2 力月後から。 

低金利クレジット 

n ± a ^./ Q =] T すべてメーカー保証窗付 
7 C ：± ll 木 fil £ アフターク•ア万全。 

AM 10 時から PM 7 時 

お■けし巧者に代金をお支払いいだだぐ方法で々。（■但し、手数料1.000 ra ) 

io - tr ±^/ r \ t ： ご両親が代理瞬入者として 
lO - lA / ffilv / J / J お申し込み下さい。 

まで受付日曜•祝日も営業 


•セツトの組合せは自由 V . 広告に出ていない他の機種はお問合せ下さい。 


•分割回数は3回〜 48 画まで自由に選べます。 


































































































































































申込香 

參商品名(商品番号） 
♦支払回数 
春お名前 
春生年月日 
鲁ご住所、電話番号 
春お勖め先 
名祢、住所、電話番号 


東京受付センター 

803(252)2608 

大阪受付センター 

006(363)1605 


►現金一括でお申込みの方 

♦商品名（商品番号）及び、住所、氏名、電話番号、ご覧の雄 
誌名をご記入の上、代金を現金書留でお送り下さい。 
•振込をご希望の方ば必ずお振込前にお電話又はおハガキで、 
お矢 D らせ下さい。 

く餓行振込〉協和銀行•久里浜支店当座 N 0.2945 
く郵便振替〉横浪 9-421 77 
►クレジットでお申込みの方 
•電話かハガキでお申込み下さい0 

ク レジ ット申し込み用紙をお送り致しますので、 ご i 己入 
の上、当社へお送り下さい。 


X- 68000に H D モデル登場， 


X^GE 

A セ 


© O ( X ^ CZ_600C : 本体 + キーボード SB 0000籲 CZ -601 C : 本体 + キ-ポ -K U 0 GOOCUCZ - B 11 C : 本体 + キ-ポ -K 

• CZ -600 D : デイスプレイテレビ卜 • CZ -601 D : ディスプレイテレヒ セト • CZ - SUD : ディスプレイテレビ 



( 商品番号 166 | 定価 K4 98,800 特別価格、 

( 商品番号 187 | 定価 *439,600 特別価格 ） 

( 商品番号 183 1 定価 K544,800 特別価格^ 

24回| 

初回18,480円 • 16,900円 X S 3 回 

24回 

初回18,880円 •17,9(30 円 x 23 回 

24回 

初回22,960円 • 22,300円 x 23 回 

(3 B 回 

初回15,040円.11，800円 x 35 回ノ 

、36回 

初回15.140円12,500円 x 35 回ノ 

、36回 

初回17,340円15,600円 x 35 回ノ 


夢を超えた • 

—新されたクオリティ&フオルム. 

常 a を超えたところに16ビットの 
理想形が見えて来る. 

f ^ SSS ^^ MBSS ^ 


63000 參 CZ -600 C :本体+キーポード 

鲁02-6000:ディスプレイテレビ 
r ^ U.wL 參 CZ -6 ST 1 :チルトスタンド 

ノ 1 參 CZ -8 PC 2 : 熱転写 プリンタ_ 

定価1574,400 特別価格 ^1 

初回21 ,960 n -1 9,800円 x 23 aj 

回15,340円.13,900円 x 35 回 J 


ミ6日000似 -600 C :本体+キーボード 

• CZ -600 D :ディスプレイテレビ 
プット # CZ -6 ST 1 :チルトスタンド 


• CZ -6 VT 1 :カラ- 


XKBBOOO #02-6000 :本体 + キーボード 

# CZ -600 D :ディスプレイテレビ 
セット • CZ -6 ST 1 :チルトスタンド 


• CZ -8 TM 2: モデムユニ 


〇 


• CZ-881C 

NEW-Z BAStC%tl « して XI 
twbo 2 が A 纛 n*C-jf=. 象 S に、 
AIM の ■ ビッ I■ マシンた • 

• CZ-880D 

I 4 KM 9- 


摞準価格289.600円 



商品番号 185 I 定価 1574,400 特別価格 

1 24回 15 回21 ，960 r • 19,8 QOr x 23 回 1 
[36 aj 朗 15.340 円* 13,900円 x 35 回 j 




( 商品 番号186 | 定価 *554,400 特別価格) 

24回 

初回19,460円，19,40 Or x 23 @ 

、36回 

初回17,040円13,500円 x 35 回 j 


爾臓 


• CZ -880 C 


• CZ -880 D 


檷準僅格327.800円 


料トー J • 


• CZ-830C 

X Mwin び） IwInU twlncom : 

HE シス，ム V 内顯し、 

ズ麟 I 里雕％ M < 

CZ-830D 

•識 II 力， 


禪準®^197,800円 



• CZ-822C 

ミニフ a ッビーディスクドラ 
イブ2ドライブ内蔺 L 最* 
得点|>必1#プ〇セスもビ 
デオに W れる初のマルチ 
ビジュアル纗子 ««JU 

• CZ-820D 

14型カラーディスブレイテ 
レビ • 

摞準偭格197.800円 


S 4 n 

mb 11 460円.11，100円 x 23 回 

24 a ： mo 10,660 r * 9,100円 x 23 b 

24 a 

mb 7,760円7,700円 x 23 回* 

24 回 

初回6,760円. 5,200円 x 23 回 

[ 38 u 

mb 10,940円. 7.70 0 n x 35 a > 

'36 i & wa 7240円* 6,400円 x 3 Sa .、 

[36 b 

mq 8.840円. 5,300円 x 35 aj 

、36 回 

初回6,840円 • 3,600円 x 35 回ノ 


8000 シリース用周辺機器 




CZ-6PV1 

/<ソ3ンやビデ: 


才機* I に対応。 
64 WBI (485 X 480ドット)で再埂 
する、昇華性染料熱転写方式 
を採用。 

標準価格198.000円 



CZ-8NS1 

离 速、 高精度で ハイレベルな画 
像 入力を実現。 最大 A4 サイズの 
原稿をフルカラー 
跣み取り可能 n 



• CZ-8PC2 

アートワーク t . 文章作成も、 

美しくあざやかに- 

JIS 第2水準满字 ROM を 

攆準装備.. 

標準価格69.800円 



C2-8PK8 

本格 実務からパーソナルまで 
裹印字品位ニーズに応える 
.ユー プリンタ 

標準価格152,000円 


( 商品 番号 14 9 | 一括払価格 158,000円 

r 商品 番号 188 | —括払価格148.000円"! 

( 商品番号〇 91 丨一括払価格 55 ,000 円 ) 

商品 番号 175「 一括払価格122,000円 

24回 

初回7,780円7,700円 x 23回 

24 回 

初回 7 

560円* 7,200円 x 23 回 

8回 

初回9,800円9,700円 x 5回 

24回 

初回 7,040円. 5,900円 x 23 回 

、36回 

初回8,840円，5,30 On x 35回ノ 

、36回 

初回 7 

040円* 5,000円 x 35 回ノ 

Ij 2 回 

初回5,500円5,000円 x 11回 v 

、36 回 

初回6,560円 • 4，100円 x 35 回ノ 


80 桁漢字ドットプリンタ 
CZ -8 PK 7 

22.000 特価¥98,000 

80 桁漢字ドットプリンタ 

??9.800 特価¥72,000 

2 D ディスクユニット 

CZ -503 F 

5? 9.800 特価¥38,000 

2 D ディスクユニット '、增設用ディスクドライブ 

CZ -502 F ; CZ -53 F 

??9.800 特価 ¥78,000 9.800 特価 ¥18,000 

20 MB ハードディスク 

CZ -620 H 

78,000 特価 ¥138,000 

カラーイメージユニット 

CZ -6 VT 1 

翱細 特価¥56,000 

カラーイメージボード II 
CZ -8 BV 2 

f ? 9.800 特価¥32,000 

パーソナルテロッパ 

CZ -8 BT 2 

555.8。。 特価 ¥36,000 

FM 音源ボード ： 1 MB 増設 RAM ボード 

CZ -8 BS 1 : CZ -6 BE 1 

^3.8〇〇 特価¥20,000 | 親 000 特価 ¥28,000 

1 MB 増設 RAM ポード 
CZ -6 BE 1 A 

$55.000 特価 ¥30,000 

GP - 旧ポード 

CZ -6 BG 1 

親 800 特価¥48,000 

増設用 RS -232 C ポード 
CZ -6 BF 1 

5? 9.800 特価 ¥40,000 

数値演算プロセッサボード 
CZ -6 BP 1 

5?1.800 特価¥64,000 

ユニバーサル 1/ 0 ポード ’• 拡張 I/O ボックス 

CZ -6 BU 1 : CZ -6 EB 1 

?? 9.800 特価 ¥32,000 | 奈&〇〇〇 特価 ¥70,000 

モデムユニット 

CZ -8 TM 2 

?? 9.800 特価 ¥4 Q，QQQ 


DATA PPO -68 K 
CZ -220 BS 

5?8.000 特価¥46,000 

BUSINESS PRO -68 K 
CZ -212 BS 

^.〇〇〇 特価¥54,000 

C コン/くイラ PRO -68 K 
CZ -211 LS 

諸咖 特価¥32,000 

NEW Z-BASIC 
CZ -141 SF 

5f 8.800 特価 ¥17,000 

_ 

MUSIC PRO -68 K 
CZ -213 MS 

?f 8.800 特価 ¥16,000 

SOUND PRO -68 K 
CZ -214 MS 

辜?5 .咖特価¥14,000 

ジェー • イー，エル 

WINDEX PRO -68 K 

^8.〇〇〇 特価¥24,000 

シスポート 

X Lin K PRO -68 K 

諸.800 特価 ¥18,000 

ツァイト 

z*s STAFF PRO 68 K 

**.〇〇〇 特価 ¥4 8,000 



① 完全保証 アフター _ ケア OK 

②全 Bi 料配送 日嚯配送可能 

③ 支払回数は 


ボーナス 併用可 

④15金利クレジツト実質年率丨 2 . 5 。〜 ms % 
©FAX でも注文 0K FAX : 0468(48)3273 

©その他広告以外の商品破扱っております。お気軽にお間合せ下さい。 


お問合せテレフォン 00468 (48)3290 て/ 


ブオリジナ^ソフトウェア 


24ピン漢字プリンタ(136桁) 


カラー ビデオプリンタ 


熱転写カラ-漢字プリンタ 


カラーイメージスキャナー 


sharpxy/ 7 r w I n 


sharpaYSSOOO 


年中無休 AM10 時〜 PM10 時 


通信販売のお申込み方法 


ハガキでのお申込みは 


電話でのお申込みは 


安心と價親の 
B 上シヨッビング 


)( ディアシヨツプ 電話 かハガキ で！! 


株式会社 メティア ショップ 八イランド 〒239神奈川県横須賀市ハィランド 3-9 - 


神奈川県横須背市 

ハイランド 3-9-6 

r 23 ㈱ メディアショップ 

〒 ハイランド 

^~ | § X 係 


► 当社は X -6 B 0 的の販売 B 定店です< 

















































































































/ 诫料稱輸\\\ 



❺為®秋葉原 


ve おなじみの 


6 / 15 - 7/20 

冬のポーナス 
一括払い手数料なし 

(ボーナス2 回 払い も ご 利用 下さい） 


參お近くの方はお 
癱本体単品で特 
籲ビジネスソフト定 



X 68000 ACE 画（送料¥2,00 0) 


(^J) -4*7%'/ k # 

CZ -611 C + CZ -61 ID + M -2 HD (10 枚） 

……定価 ¥ 544,800岭 P & A 超特価(価格はお電話下さい。） 


12回 

37,000 

24回 

19,300 

36回 

13,300 

48回 

10,300 

60回 

8,600 


⑧セット： 

CZ -611 C + CZ -601 D + M .2 ND (10 枚） 

……定価¥ 519，600岭 P & A 超特価(価格はお電話下さい。） 


12回 

35,200 

24回 

18,400 

36回 

12,700 

48回 

9,800 

60回 

8,200 


※ X -68000 セットでお買い上げの方に源平討魔伝¥ 7,800をプ W ント致します。 
兹チルトスタンド ( CX 6 ST ¥ 5, 800) 必要な方は¥ 5,000加算じ TT さい。 


X 68000 ACE (送料 ¥2,000) 


® セット： 

CZ -601 C + CZ -6 11 D + M -2 H D ( 10枚） 

……定価¥ 464,800岭 P & A 超特価 ( 価格はお電話下さい。） 


12回 

31，300 

24回 

16.400 

36回 

11，300 

48回 

8,700 

60回 

7,300 


⑧セット： 

CZ -601 C + CZ -60 1 D + M -2 H D ( 10枚） 

……定価¥ 439,600岭 P & A 超特価(価格はお電話下さい。） 


12回 

29,600 

24回 

15,500 

36回 

10,600 

48回 

8,200 60回 

6,900 


※チルトスタンド ( CZ -6 STI ¥5,800) 必要な方は¥5,000加算して下さい。 

※ X -68000 セットでお買い上げの方に源平討魔伝¥ 7,800をプレ tf ント致します ） 


x - i ターボ z/zn 


(送料¥2,000) ソフトコーナー 


(送料 ¥1,000) 



※チルトスタンド ( CZ .6 STI ¥5,800) 
必要な方は¥5,000加算じ T 
下さい。 


ット： 

X .1 ターボ Z ( CZ -880 C + CZ -880 D )+ M -2 HD 
(10 枚)+ジョイカ—ド+ゲームソフト 3 fl 

……定価¥ 327,800岭超特価 ¥180,000 

|12回「5,600124回18,200 [36 回15,600_14,3003.6001 

• NEW Z-BASIC ( CZ -141 SF ¥ 18,800) 必要な 
方は,¥15,000加算し XT さい。 

ッド 

XI ターボ ZI ( CZ -881 C + CZ -880 D )+ M -2 HD 
(1 敝)+ジョイカード+ゲームソフト 3 S 
定価¥ 289,6004 p&a 超特価(価格は Tel 下さい。） 

11201 18,200124回19,500「36016.500100160 H ] 14,2001 


X - 68000用 

®CZ-213MS(MUSIC PRO-68K). 定価 ¥ 18,800 岭特価 ¥16,000 

⑧ CZ.214MS(SOUND PRO-68K). 定価 ¥ 15,800 岭特価 ¥13,500 

©CZ-212BS(BUSINESS PRO-68K). 定価 ¥68,000 岭特価 ¥57,000 

®CZ-211LS(C compiler PRO-68K). 定価 ¥39,800 岭特価 ¥33,500 

⑥ Z’s STAFF PRO-68K (シャフト) . 定価 ¥58,000 ■►特価 ¥46,000 

©Kamikaze (神風)(サムシンググッド) . 定価¥昍, 000 岭 特価 ¥49,000 

◎ ビジネス AD68K (マッシュシステム) . 定価 ¥ 98 ， 000 岭 特価 ¥78,500 

⑭弥生 ( 日本マイコン販売 ) . 定価 ¥ 80,000 岭特価 ¥64,000 

① CP/M-68K (ニューウェイブ) . 定価 ¥110,000 岭 特価 ¥88,000 

X - 1シリーズ 

③ SHOGUN (サムシンググッド) . 定価 ¥34,800 岭特価 ¥25,000 

® SAMURAI (サムシンググッド) . 定価 ¥19,800 岭 特価 ¥15,200 








































































































アフターサービス 万全 

全商品保証付。専門の担当者がお客楢の立埸で対応します> 

初期不良、輸送トラブル etc. 

万が一初期不良、輸送トラブルが発生しました際には、即交換させていただきます。 


超低金利クレジット率 


•定休日/毎週水曜日=第 3 水曜•木曜は連休とさせていただきます(祭日の場合は翌日になります） 


回数 

1 

3 

6 

10 

12 

15 

18 

24 

36 

48 

60 

利率制 

1.5 

2.0 

3.0 

4.5 

4.5 

7.5 

9.0 

9.5 

13 

17 

22 


マイコン 

ビデオ 

ビデオテープ 



株式会社ピー•アンド•エー 

亍 124 東京都葛飾区新小岩 2 丁目 7 番地 1 号 （但し 

©03-651-0148( 代) 


♦當業時間 AM 11:00 〜 PM 9 :〇〇 
日•祭日も受付けます， 

(但し PM 8:00 迄） 


FAX . 

03-651-0141 



f « A 胸超特価セール で ご奉仕// 


立寄り下さい。専門係員が説明いたします。 

価で受付しま丸詳しくは電話にてお問合せ下さい。 
価の20%引き OK / TEL ください。 


自匿画画一 




★頭金なし/★即日発送 


超低金利クレジット OK /， 1回〜60回払いまで OK // 


X -1 twin (送料 ¥2,000) 



® セット： 

X-ltwin ( CZ -830 + RF コンノ く一夕 
一 （ AN 58 C )+ M -2 D (10 枚)+ジ 
ョイカード+ゲー厶3種 

.定価 ¥ 102,7804超特価 ¥77,000 


[ I 2 回 1 6 , 7 〇0[ 24 回 |], 5 〇01 

⑧セッド 

X - ltwin ( CZ .830 C + CZ -830 D )+ 
M -2 D ( 10枚)+ジョイカード+ゲ 
—ム3種 

定価¥197,800岭超特価 ¥142,000 


[] 20112 , 300124 @| 6 , 400136 @| 4 , 400 | 48 |] 3,4001 


プリンターセット※全セットにヶーブル、用紙付（送料¥1,000) 




⑥ CZ-8PK6 

定価159,000 

特価 ¥89,800 

(用紙1000枚付送料無料) 


@Hz ット: CZ .8 PC 2" 


•定価¥69,800岭超特価 ¥55,000 


4,600 


3,200 


®Hz ッド CZ .8 PK 7" 


•定価 ¥ 122,00( HP&A 超特価 


12回 8,100 24回 


4,200 


30回3,500 


© CZ-8PK5 

定価129.000 


特価 ¥69,800 

毛紙1000枚付送料無矜 


©セット: CZ -8 PK 8. 定価¥ 152,0004 P&A 超特価 


10，100 


5,300 


36回 3,600 I 


◎ H 2 ット: CZ -8 PK 9. 定価 ¥ 89,8004 P&A 超特価 


12回 6,000 24回 3,100 


カラービデオプリン ター （送料¥1,000) 


④セット： CZ -6 PVI . i 定価¥ 198,000■►超特価 ¥155,000 


12回 

13,400 

24回 

7,000 

36回 

4,800 

48回 

3,700 

1 


カラーイメージスキャナ（送料¥1,000) 


® セット: CZ 8 NS 卜 


•定価 ¥ 188, 〇〇〇岭超特価 ¥145,000 


12回 

12,600 

24回 

6,600 

36回 

4,500 

48回3,500 

1 


周辺機器コーナー(送料¥1,00 0) •その他の周辺機器はお電話下さい。 


® CZ -8 BSI (FM 音源ポード) . 定価 ¥ 23,800 ■►特価 ¥19，( 

( DCZ -8 RLI (データレコーダ） . 定価¥ 24,800蟀 特価 ¥20，1 

© CZ -8 AV 2 (カラーイメージボード D ) . 定価¥ 39,800 ■►特価 ¥31， 

◎ CZ -8 BRI (立体 映像 セット) . 定価 ¥ 29,800 ■►特価 ¥23，( 

⑥ CZ -8 DT 2 レ、•ーソナルテロッパ) . 定価¥ 44,800岭特価 ¥35，（ 

0 CZ -6 VTI (カラーイメージユニット） . 定価¥ 69,800岭特価¥55，1 

© CZ -6 EBI (拡張 I/O ボックス） . 定価¥ 88 . 000岭 特価 ¥69,000 

，〇〇〇 


3,000 

3,000 

1，000 

3,000 

5,000 

5,000 


⑭ AN -160 SP (アンプ 内蔵 スピーカーシステム）“定価¥ 59,800岭特価 ¥47，C 


X -1 G モデル30 (送料¥2,000) 


m 


® セット： 

X - IG テデル30 ( CZ -822 + RF コンバー 
ター ( AN -58 C ) + M -2 D ( 10枚）+ ジ 

ョイカード+ゲーム3種 . 

."定価 ¥120, 980*4 超特価 

¥62,000 


12回5,300 20回 [3, 300 


⑬セット： 

X-IG モデル30 ( CZ -822 C + CZ -820 
D ) + M -2 D ( 10枚）+ジョイカード+ 
ゲーム3種 . 

定価 ¥ 197,8004超特価 ¥98,000 


12回〔8,500 12:4回[4,400 Ym \ 3,000 | 


通信モデムコーナー（送料¥1,000) 


® PV - A 1200 MK n (アイワ) . 定価 ¥ 26,800岭 特価¥21， 

⑧ PV - A 2400 ( アイワ） . 定価¥ 49,800岭 特価¥40^0 

© MD -1200 E (オムロン） . 定価¥ 24,800蛉特価¥1 QX 

© MD -2400 A (オムロン） . 定価 ¥ 59 . 800岭 特価¥47，¢ 

⑥ SR 120 MS (エプソン > . 定価 ¥29. 800岭 特価 ¥23，¢ 

( DSR -240 AT (エプソン） . 定価¥ 59,800岭 特価¥47，彳 


P & A 特選パソコンラック（送料無料） 



®3 段 
875(H) 

X 580(D) 
X610(W) 

¥8,500 



⑧4段 

1245(H) H 1280(H) 
X 600( D ) J ^^ X 600 ⑼ 
X614(wT^ X620(W) 

¥13,500/^¥16,500 


通信販売お申し込みのご案内 


〔現金一括でお申し込みの方〕 

•商品名およびお客様の住所•氏名•電話番号をご記入の上、代金を当社まで、現金 
書留でお送りください。(プリンター•フロッピーの場合、本体使用機種名を明記のこと） 
〔銀行振込でお申し込みの方〕 

•銀行振込ご希望の方は必ずお振込みの前にお電話にてお客様のご住所•お名前 • 
商品名等をお知らせください。 

(電信扱いでお振込み下さい〇) 

〔クレジットでお申し込みの方〕 

•電話にてお申し込みください。クレジット申し込み用紙をお送りいたしますので、ご記入 
の上、当社までお送りください。 

•現金特別価格でクレジットが利用できます> 残金のみに金利がかかります> 

參 1 回〜 60 回払いまで出来ます。但し、 1 回のお支払い額は 3,000 円以上。 


〔振込先〕住友銀行新小岩支店 
当 No . 263914 ㈱ ピー•アンド•エー 
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シャープ X 68000 ACEBD 

本体+キーボード (CZ-611C-GY) 標準価格¥399,800 

CZ -600 C を下取りした場合特価¥178,000 

• 68000搭載•最大12パイトの大容置メモリ參 20 M バイトハードデ f スク内蔵•高解度自然色グラフ 
イツクス參フレンドリー OS Human 68 K 搭載等、先進機能満載。••…豊富な周辺機器がサポート 



V \ " \\，\ 


セツト大特価/ 


•本体+キーボード (CZ- 600 E) 標準価格 ¥*369reee- 
fv *| ixrniin nnn i 擊彳5型カラーテ'イスプレイテレビ (CZ-600DE ) 標準価格や meee- 
ス八リ 羊 J 4 U ， UUU/ •チルトスタンド (CZ-6ST1E) 標準価格卿9§~ 


高度なパフォーマンスを秘めて、新登場/ 

1 2 MHz の高速80286 CPU 、 高速グラフィック LSI 搭載。 

A 胼書による高度な日本語処理、 MS-DOS V 3.1。 


リアルな映像と音が削造力を刺激する。 



IJJ を暨，暨壽 、 v .\ \ \ \ \ . 

t ァ似雲- 

參 16 ビットパーソナルコンピュータ MZ -6551 
( 1 . 2 MB FD 2 基搭敝)標準価格 V 430.000 
癱 16 ビットパーソナルコンピュータ MZ -6556 
( 1 . 2 MB FD 2 基、 20 MB HD 1 * 搭败)摞準 価格 Y 650.000 
. 下取り価格、 及び 特価に つきましては、 ® i 舌でお問い合わせください。 


ノ、•ソコンテレビ A：i turboZ 
本体+キーホード ( CZ -880 Ci 
標準価格 ¥218.000 



下取り機種問わす/サービス大特価¥10騰 


參アナ a クカラーイメージホード内蔵參 4 , 036 色対応ニューテ a ッパ檄能參 8 重和音ステレオ FM 音;» 
搭 *£ •マウ; Mi 準装備 0 JIS 第 1 /第 2 水準;薄字 ROM 実装•システム、ユーサー辞書装儂參…ハ 
イト 5 インチフロッピー 2 »搭 Di 


日まで I ; 


>モテムユニット（シャープ CZ -8 TM 1 ) 


お買い上げの方に 


ブレゼント 



★ xiin はご n . 火の陬にお叫い rw > せ卜さい.. 

^acT iJS | Hni ★• mwcoiftj . v , は.ナベて靳 , v “況 , iii : ■きで * n 
■■■■墨 の iiw スは允分⑴ .ca てありますが.こづ I 欠の pc 

IBI 1 SSL •SMSS は、化卜 1 •'の做 4 の I ノ W 介たは • SH i 丨似込で 
I 3 KI |jE Ml " お中し込み I 、さい,令商品クレジットでも枓っております， 
片 ★ わ . 1 pi 込みの撕は必ず • liMiV . ■:を" M . ua てドさい‘ 

北海道から沖縄まで★齡 ，_れ_はご 純 ドさい。 

富士銀行八王子支店（普）1752505 


り，心：く川ハ十 


イ言用をモットー 


MBIT 

アイビット電子株式会社 

亍192東京都八王子市北野町 560-5 


^ 0426 - 45 - 3001^3 

FAX .0426-44-6002 

镰営業時間:10:00〜19:00 
奪電話受付：20:00迄可 
•定休日：日曜日(祭日営業) 


霤赛 i バ75下取 f \ 1 

いま御使用のパソコンを高価下取りの上、 MZ -65□□モデル50、シャ I プ X 6日□□ OACEIHD ^またはパソコン 
テレビ xlturboz を PV ビットならではのサ—ビス大特価でお届けします。 






















































■富士通 FM 周辺機器(約 150 機種)ご希望の方に特価リスト差し上げます〇(切手 70 円を添えてお申し込み下さい。) 


他にも カラーモニター 各種在庫あります> 


■} Q 


• シャープ Cu 148 D (1 4型） 
アナログ2000 MOOO 

定価 ¥64.800 

特価 ¥54,800 


• シャープ CZ >820 DTV 付 

特価 ¥39,800 




シャープ CZ 870 D . TV 付 
( 14型〉2000/4000自動切換 
定価 ¥109.800 呤 

特価 ¥ 69,800 



摯官士通ゼネ ラル DM *405 1 
( MSX 2、 FM - AV 2 対応） 
定価 ¥67.800 呤 

特価 ¥36,000 


シャープ CZ -600 D 
(15 型） TV 付 
定価¥129.000岭 

特価 ¥89,800 


Q_ 

_シャープ CZ 880 D _シャープ MZ -1 D 10 
TV 付 （14 型） C 12型） モノクロ .40; 

定価 ¥109.800イ - 800- " 


シャープ MZ -1 D 10 
(12 型）モノク a .4050 文字 
定価 ¥41. 800— 

特価¥87,800為 5 5,000 


# シャープ CU -14 GE (14 型） 
定価¥49.800*ィ 

特価 ¥ 2 $ 谷 00 



.シャープ MZ -1 D 26 
定価 V 89.80 0 — 

特価 ¥ 尽分 , 石 00 



I シャープモニター 
MD -12 P 1 (グリーン） 
MD -12 P 2( モノ ク 〇〉 
定価 ¥39. 800-* 

特価 ¥ 之沒 , 000 



•シャープ CU -14 AD 
(14 型）ドツトビツチ0.31。 
200 M 00 デュアルスキャン 

定価¥84,800今！ 

特価 ¥67,800 



馨 NEC PC - TV 352 
05型） 

定価 ¥115,000 i 

特価 ¥78,000 


❿©©@ シャープ X 1 G 六雜_ 


定価合計¥189,380 

大特価 ¥ 39 , 800 / 


① X 1 G 本体 ( CZ -820 C ) 定価 ¥ 69.800 

② 3インチフロッピー (300 F ) 定価¥ 79,800 

③ インターフェース (8 B 01) 定価¥ 14.800 
ADISC BASIC (8 W 301) 定価 ¥7,000 
⑤ TV 用 アダプター ( AN 58 C ) 定価¥ 2,980 
i ;3 インチ DISK ソフト5本定価 ¥15.000 

※ご希望のかたには回路図差し上げます，（台数に限りあり） 

※ソフトにつきまじ T は各種本が出版されております， 

浓家庭用の TV にそのまま使えます: （5 インチフロッピーセットもあります >) 

バラ売りもします/ (修理代より得ハ 

マニュアル +New BASIC V.2.0 
¥3.500 



BASIC を初めて学ばれる方ノ 
※テーブ版マニュアルは 

CZ -820 C のものです • 


,^ 本体 ¥ 10,000 

3 Z 


X トンリーズ共通キーボード、カセット I コント a —ル付.. 
CZ -800 C , 802 C .81 ia '812 C . 820 C .822 C .830 C 
はもちろん CZ -801 C 、803 CJ 804 C も 0 K 。 

※ターボシリーズも使用可。但し漢字入力 
キーなどはありません 


•取説、ケーブル付.- 
CZ -800 C .801 C 
803 C 、804 C の予偏に/ 


JOY 力-ド ¥1.300 


CZ -8 NJ 1 とまったく 
同じものです、 


samizs 嫌膽も s 漏。 


本誌発売時には、下記価格表よ D 、 さらにお求めやすい価格に変更され C いる場合があ D ます> 


本体 

•シャープ CZ-300F. ¥13,000 

• シャープ CZ-601C. ¥ 319,800今超特価 G 

•シャープ CZ-611C. ¥399,800，今超特価 Q 

參シャープ CZ-822C (本体） . ¥69,800 

•シャープ CZ-881C(xi ターボ Z). 超特価 S 

• シャープ CZ-830(xi ッイン)+カラー TV モニター. -¥110,000 

• シャープ CZ-811C. ¥ 89,800今¥ 19,000 

•シャープ CZ-803C. ¥ 119,800^ ¥29,800 

•シャープ CZ-880C (XIシリーズ下取りの場合）¥100,000 

•シャープ MZ-2861+ チャートアップ .¥245.000 

• シャープ MZ-561 1 . ¥ =>¥45,000 

♦シャープ MZ-5521. ¥388,000呤 ¥65,000 

•シャープ MZ-6551. ¥ 430,000呤超特価 S 

•シャープ MZ-6556. ¥650,000吟超特価 S 

•シャープ MZ-2520. ¥ 159,800今 ¥78,000 

•シャープ MZ-2531. ¥ 198,000今¥120,000 

籲富士通 FM77AV20-2. ¥ 168,000-4 ¥89,800 

籲富士通 AV40EX. ¥ 168,000呤 ¥126,000 

•NEC PC-9801UV11、LV2UCV21 入荷予定3末〜4末 

•NEC PC-9801VX4. ¥ 643,000呤 ¥380,000 

• NEC PC98XA2. ¥ 695,000今 ¥ 170,000 

參 NEC PC-98LT. ¥ 238,000¥85,000 


拡張機器他 

•シャープ CZ-8TM1 (モデム)……¥ 29,800¥9,800 
•シャープ MZ-lE29a s 2i^_ プル付） ¥ 17,8004 ¥9,800 

籲シャープジョイヵード . ¥1,500 

參シャープ CZ8EM(320KB ポード）..¥88,000今¥20,000 

籲シャープ CZ-8EB-3(xi 拡張 I/O ボックス) . ¥28,000 

•シャープ CZ-8EP(xi 拡張ポート） ••¥ 11,800今 ¥9,000 
• シャープ MZ-1U01(2000 用拡張) • ¥ 37,000今（在庫切れ） 
• シャープ MZ-1 U02< 3500用拡張)- • ¥ 20,000吟 ¥ 7，000 
• シャープ MZ- 1 U03(700 用拡張) •• ¥ 35,000呤 ¥ 15,000 
•シャープ MZ-11105(5500 用拡張） ••¥ 12,0004 ¥8,500 
• シャープ MZ- 1 U09(2500 用拡張)…¥9,000呤¥7,200 

• シャープ1 R01+1R02X2. ¥ 55,000今 ¥ 15,000 

•シャープ MZ-1E 24232 C カード •• ¥ 丨9,800呤¥ 16,800 
•シャープ CZ-8BK3 ほ鸽苦 m ) …¥ 13,800今 ¥11,700 
•シャープ CZ-8BK4 ほ縱 M ) ……¥6,800今¥5,700 

•シャープ MZ-1T02. ¥ 19,800峙 ¥8,500 

參シャープ MZ-1M03 (其*センサ-) . ¥ 69,000今¥35,000 


•シャープ MZ 8 BC 04(?! i B プル） • 

• シャープ MZ -8 BI 04( GPIB カード). . ¥ 45,000今 ¥ 18 , 000 
參 シャープ MZ -1 R 09(») ……¥ 35, 000 H > ¥25.000 
• シャープ MZ -1 RIOC ^ om ) .…¥ 30 , 000吟 ¥ 12 ， 000 
•シャープ MZ -1 Rl 1……¥ 80 , 000今 ¥ 40 ， 000 

•シャープ MZ -1 R 18 Q ^^ T )..... ¥ 18,000今 ¥12,000 

•シャープ MZ -1 R 19( 乾级字 ROM ).¥ 35,000 今 ¥15,000 
• シャープ MZ -1 R 24( 辞畲 ROM) …¥ 22,000 吟 ¥ 10 , 000 
•シャープ MZ -1 R 26 A は¥ 15,000 ■=>¥12,800 
• シャープ MZ -1 R 27 A (?^ ram ) .. ¥ 13 , 000 今 ¥ 10 ， 000 
•シャープ MZ -1 R 28 A (沿^思 M ).._ ¥ 13,000 今 ¥10,000 

•シャープ MZ - lR 29 ACTi 想 M ). 特価 ¥10,000 

•シャープ MZ -1 R 37(^?|? ィル)…¥ 35,800今 ¥28,000 
• シャープ MZ -1 T 03 データレコーダー ¥ 12,000 ^¥8,500 
參 シャープ CZ 8 BGR 2 (xi ターボ 10 用）¥ 14,800 ^ ¥4,000 

籲シャープ CZ -8 BS 1 (ステレオ fm 音源ボード) . ¥19,500 

• シャープ CZ -51 F (ターボ增設) 同等品 . ¥25,000 

• シャープ CZ -52 F (X〗 F 增 股)同等品 . ¥22,000 

•シャープ MZ -2000/2200/80 B /1 500/700用 . 

(球;:-スヵード） . ¥18,000 

•シャープ/^-旧5(ぱ€^ィス).¥35,〇〇〇今¥28,00〇 

•シャープ X 1、 MZ 用マウス . 特価¥4,800 

•シャープ MZ -1 X 29( 光学マゥス)……¥ 13,800今 ¥11,000 
•富士通マウス MB 22436 ( av 、 N 7 、 L 2 、 L 4 対応） 

. . . ¥68,000今 ¥15,000 

• シャーフ。 MZ - lX 03(^ r 2 !^? フク）… ¥ 3,800 呤 ¥2 ， 000 
•シャープ MZ -1 M 08( ボイスボード)..¥ 10,000今 ¥6,000 
•シャープ CZ -8 EM ( i " 齡/は-ド） ¥ 88,000今 ¥22,000 
•シャープ X トンリーズ用キーボード . ¥10,000 

ブリンター 

♦シャープ MZ-1P27( 水平プリン外.¥ 268,000今¥214,400 
• シャープ MZ-1P28( 嘯カン外 •¥ 148,00 0H>¥118,400 
•シャープ MZ-lP29(】32«i プリンタ).¥ 168/000今¥ 134,400 
•シャープ MZ-1P17( 口 H 若プリンタ） 

. …¥ 85,800今. ¥39,800 

• シャープ MZ -1 P 09(!^£： 雜為） … ¥ 47 , 6004 ¥ 15 ， 000 
• シャープ MZ -6 P 1 1(エ2^1!：シーり •¥ 95,000=4> ¥35,000 

•シャープ CZ -8 PD 2 . 特価 ¥25,000 

• シャープ CZ -8 PD 3 . ¥59,800^ ¥19,800 

參 シャープ CZ -8 PK 5(80 桁）..…¥ 129,000今 ¥69,800 
•シャーブ CZ -8 PK 6030析)…¥ 159,000今 ¥89,800 


¥ 18,000^¥8,000 • シャープ CZ -8 PC 2( 孕.ち5)……¥ 69,800今¥55,000 


r#NEC PC-PR405-0K2 水準漢字)…¥23,800今 ¥8 ， 900] 

• NEC NM- 930 0S(gS 索プリンター)¥ 253,000 =>¥68,000 

• シャープ CZ-8NS 1(イメージスキャナー） 

. ¥ 188,000今 ¥158,000 

參シャープ JX- 100、200 (カラースキャナー) 入荷予定/ 

• 日立 MP-1053C^^ ンター） .. ¥ 315,000今 ¥ 158,000 

フロッピーディスク 

「•シャープ CZ-503F(5 ^ dxDC ^ iS ： ぶ-ス）.•…¥34,0001 

• シャープ CZ-502F(5‘2D X 2)( 化タブ了ぶ-ス)……¥75,000 
• シャープ MZ-1F07C^ 女^—ス)¥ 158,000吟 ¥95,000 

ソフト 

• シャープ CZ-21 LLS(C コンパイラ)…¥ 39 , 800今¥33,800 
參シャープ CZ141SF(NEWBASIC) ¥ 18,800今¥16,000 
•シャー7^^-22013(游 〇 小...¥25,000呤¥21,000 
• シャープ MZ-2Z0〗7(i 恐 C3 ) …¥ 20,000今 ¥ 17,000 
•シャープ MZ-2Z032( ぽ 0 B a SIC )〜 ¥ 12,000呤¥6,000 
• シャープ MZ-2Z064( 定ヮ切) . ¥ 69 , 800今 ¥59 ， 500 
籲シャープ MZ-8BD02(80Bf、DOS) …¥ 50,000今 ¥ 15,000 

♦シャープ MZ-1Z-005. ¥25,000呤 ¥21,500 

•シャープ MZ-IZOKKI^/ gmb ) …¥9,500今¥8,500 
•シャープ MZ-023( 怒^ _ c ) ¥ 50,000今 ¥42,500 
參シャープ MZ-025( 故^-プロ)- ¥ 49,800今 ¥ 15,000 
•シャープ MZ-2Z01 4 ( today ) …¥68,000呤 ¥15,000 
•シャープ MZ5Z013( 通信ソフト）••…¥6,500今¥2,000 

•シャープ 6F03(QD ディスク) . 10枚¥4,000 

• シャープ MZ-1E 26( 以二). • ¥ 24,800今 ¥ 13,000 
•シャープ MZ-6Z0K) (なトフぷぢ).…¥ 10,000呤¥8,500 
癱 MZ-1M01+ 漢字 ROM. ¥9,800 

SHARP ポケットコンピュータ 

• PC1360( 本体) . .……¥29 / 800±¥19.800 

• PCE200 (本体)" . ¥ 22,000今 ¥ 17,800 

• PCE500( 本体) . ¥ 28,800呤 ¥24,800 

• CE-150 d 您ンダ〉 . ¥49,800^¥10,000 

• CE-152( データレコーダ〉 . ¥ 19,800今¥9,800 

• プログラムモジュール (CE. 16〗〉. . ¥ 50,000今¥10,000 
• プログラムモジュール (GE459> .…¥35,000今¥6,500 

ボケコン総合カタ a グ並びに特価表を差し上げます。 

切手¥70を同封の上、当社へお申込みください。 


A1V1T 

アイビット電子椀式会社 

〒192東京都八王子市北野町 560-5 


※ 掲載されている商品は全て新品保証付きです。 


C0426'45'3001^3 

FAX .0426-44-6002 


、営業時間:10:00〜19:00 
、電話受付:20:00迄可 
>定休 日：日曜日(祭日営業) 


イ言用をモットー 


全通販 
国信売 

北海道から沖縄まで 


く、迅速にお届けします. 


★送 H はご n 文め除にお i » h 、介わせドさい。 

★祀故の商, v , は、すべて糾品. ㈣ : , w きです。 

★ 祀攸の商 i v , は充分川, a してありますが、ご i I . 义の阶 
は、作•冲の贿涊の I .ノ w 贪，り切または、銀け佤込で 
お|||し込みドさい。令商品クレジットで t 扱ってお Oi す， 
★お 11 1し込みの阶は必ず也聆•心を叫,:じしてドさい.、 
★ lOj .' nS , WJ れの節はご界赦ドさい。 


富士銀行八王子支店（普）1752505 


糸父1シリーズ中古品リストご希望の方に差し上げます)お申し込みは当社「 X トンリーズ中古品係 _) まで。 































































































クレジ， 



COMPUTER 
BANK 


安心と信頼のシステムで新時代を切り開く 



KX 68000 


'づいにベールが剝された/〃 68000 CPU 搭載。ひとつひとつのス 
ペックに新鮮な驚きがある。未体験の機能美が創造力を刺激する。 


• 機能美あふれ6ハイコンパクト投計， 

• 32 ビットへの 移行が スムースに 行える将来性を見越し 
た 68000 CPU を採用,， 

• メインメモリは、大容置 1 M バイトを摞準装備（最大12 

M バイト)„ 

_ク □ ックは 10MHz のハイスピード， 

_アート心を»らせるグラフィックスは、 65.536 色を最大 


☆注文 No . A -0713 

SHARP CZ-60 I C 
SHARP CZ-61ID 

標準価格合計 

現金特別価格- 


¥399 .800 
¥119.800 

¥519,600 


■ お支払例 

① ¥5,9OO x 60 回〔ボーナス〕¥ 21 ,000x 丨〇回 
©¥9,200 X36回〔ポーナス〕¥ 31 ,000x 6回 
③ ¥9,400 X 60回〔ポーナス〕無し 


512X512 モードで同時発色の上、新闋発スフライト 1C 
採用で嫌密でスムースな動きの本格 G . G が楽しめる。 
• ステレオタイプの8オクターブ8重和音 FM 音源を採用 
しム • R2 チヤンネルのオーデイオ出力を使えば、ダイナ 
ミックなシンセサイザーサウンドの世界が拡がる。 

• もちろん JIS 第い第 2 水準漢字は標準実装、日本《 
処理機能は強力， 


☆注文 No . A -0714 

SHARP CZ-601C 
SHARP CZ-60ID 

標準価格含計 
現金特別価袼- 


お支払例 

① ¥4, 9OO x 60 回〔ボーナス〕¥丨8,〇〇〇 x |〇回 
©¥9,200 X 30回〔ボーナス〕¥ 30,000 x 5回 
③ ¥9,400 X 48回〔ボーナス〕無し 



•とこよ0もお得な离額下取0実施中// •今すぐぉ電栝下さい 


E 


u マルチアーテイストマシン" 


.NEW Z-BASIC (CZ-8FB03) の搭載で 4096 色マ 
ルチモード、 64 色 2 面面合成、 8 重和音 FM 音源、ビデ 
オデジタイズ櫬能などをフルサポートされています。 

• 内部は、さらにパンク RAM を 64K パイトを追加し、 512 
KB パンクメモリを標準でサポートされました。 

• 複雑な入力も簡単に操作できるマウスを標準装備。 

• 大容量、 IM バイトディスクドライブ2期内蔵。 


☆注文 No . A -0715 

SHARP CZ-88ICBK 
SHARP CZ-880DB 

標準価格含計 

現金特別価格- 


¥179.800 

¥109.800 

¥289.600 

-¥ 28 »re 0 tT 


_ お支払例 

©¥5,000 x 36回〔ボーナス〕¥ 15,00 ox 6回 

② ¥8,900 X丨8回〔ボーナス〕¥ 30,000 X 3回 

③ ¥8,800 X 30回〔ボーナス〕無し 


•どこよりもお得な离額下取り実施中ガ•今すぐお電話下さい 



IY/7 


twin '' HE システム〃 

(PC Engine ) 搭載で楽しさ2倍 


• HE システム (PC Engine) を内*してゲーム機とパ 
ソコンのあいだを埋めたニューモデル Joy カードも標 
準装備 

• HE システムモード *X-1 モード•又、同時に両方を 動 
作可能 

• 5インチ .320K バイトディスクドライプをI 基搭載スー 
パーインポーズ機能内蔵、 


☆注文 No . A -0716 

sharp CZ-830CBK 
SHARP CZ-820DB 

摞準価格合計 

現金特別価格- 


¥ 99.800 
¥ 79.800 

¥179.600 

•¥uar6eo 


I お支払例 ■■■■■■Hi 


① ¥5,200 X 16回〔ボ_ナス〕¥ 23,000 x 2回 

② ¥8,900 x 丨2回〔ポ_ナス〕¥ I0,000x 2回 

③ ¥8, 10QX 丨6回〔ポーナス〕無し 


•どこよりもお得な离額下取 D 実施中ガ•今すぐお電話下さい 





齡 r 




☆注文 No.B-0723 

M 24 ビン昍桁、』 S 第 1 •第2水準漢字実装。 

八ガキ印字可能な蒿速コンパクトプリンタ" 


sharp CZ-8PK5 

現金特別価格- 

■ お支払例 I 


¥129.000 

■¥69,800 


400 x 1〇回〔ボーナス〕無し 



☆注文 No.B-0724 

M 24 ビン136桁、 J 旧第1•第2水準漢字実装。 

八ガキ印字可能な 高速 ビジネスブ U ンタ" 

sharp CZ-8PK6 ¥159. 000 

現金特別価格- ¥89. 800 

■ お支払例 mmammmmammKmmmmmm 

① ¥9,500 x I〇回〔ボーナス〕無し 
©¥3,000 x 36回〔ボーナス〕無し 


☆注文 No.B-0725 

34ドツト熱転写カラー漢字プリンタ" 

SHARP MZ-IPI7 ¥79.800 

CZ 用ケーブル ¥ 7.800 

標準価格合計 ¥86.600 

現金特別価格- ¥42. 800 

_ お支払例 

©¥7,400 x 6回〔ボーナス〕無し 
② ¥3,800 x 12回〔ボーナス〕無し 


U .巳.クラブ制度_ 

当社で商品をお買い上げの方全員に、 C.B. クラブ 
カードを無料でお送り致します。このカードをお 
持ちの方なら次の買い換え時や、周辺機器の購入 
時に会貢特別価格でご購入になれます。 

会員専用ホットライン， 03(797) 144ぐ 



シヨール- 


み ★改装中の為、 休業中です。 

〇中古パソコン展示即売 

〇レンタル*リース用 PC-9801 展示 
〇ビジネスソフトのデモ実施 


職 


話題の新製品が全国どこでも電話で買えるガ 



































































SHARP 
CZ-801C(x-ic) 

¥ I 19,800 岭 ¥ 10,000 





SHARP 

CZ -811 C ( x - if / io ) 
¥ 89, 800 峰 ¥ 12,000 


SHARP 

CZ -820 CE ( x-i g モデル i o ) 
¥ 69,8004 ¥ 16,800 
X -1 G モデル 10 RF コンバータセツト 

(本体 + AN -58 G ) 

¥ 72,780 岭 ¥ 19,600 
XHG モデル 10 ディスブレイセツト 

(本体+〇 U-I4GB) 

v 1 19,600 46,600 


SHARP 

CZ-822C 日 （ xi-g モデル3〇) 

v 1 18,000岭 f 59,800 
X -1 G モデル 30 ディスブレイセット 

(本体 + CU - I 4 GB ) 

¥ 167,800 岭 ¥ 89,600 

X -1 G モデル30 TV ディスプレイセット 

(本体+ TV デイスフレイ） 

¥ 197,800 蛉 y 99,600 


SHARP 
CZ-880CB 新品同枝 

( X-lTurbo Z 本体) 

¥ 218,0004 ¥ 102 y 000 
CZ -880 DB r MM 福 J 
v 109,800 岭 ¥ 86,000 
セツト価格 

V 327,800 岭 ¥ 188,000 



SHARP 

CZ-820DE-BES 

(14 インチ 2000 字 RGBTV ) 
¥79,800 岭 ¥ 39,800 


SHARP 

本体 

CZ -80 IC ( X - IC ). ¥ 119,800蟑ゼ 

CZ -804 C ( X - ICK ). ¥ 139,000岭ゼ 

CZ -812 C ( X -1 F model 20). ¥ 139,800蟀ゼ 

CZ -822 C ( X-IG model 30). V 118,000>4 f 

CZ -850 C ( X - lTurbo/model 10). V 168,0004ゼ 

MZ -1500. V 89,800岭ギ 

MZ - 2200 .¥ 128,000岭ギ 

MZ -2531 ( MZ -2500 V 2).¥ 198,800岭ギ 

テイスブレイ 

12 M -18 B (12 ■•グリーン4050文字) . V 44, 800# 

12 M -212 C (12 •カラー2000文字） .¥ 99,800 蟀ゼ 

12 M -312 C (12 •カラー2000文字） .¥ 89,800 疇ゼ 

12 M -314 C (12_ カラー4050文字) .¥ 128,000蟀ギ 

14 M - IIIC (14 ••カラー 1 000文字） .¥ 67,800 ■♦ゲ 

14 M -522 C ( 丨 4 -カラー4050文字） . V 99,800 蟀ゼ 

CUH 4 F 1(14 •カラー2000文字) . ¥ 64,8004ギ 

CU -14 AG 2( 14”カラー4050文字) . ¥ 84,800岭ギ 

CZ -80 ID ( I 4 •カラー2000文字 RGBTV ). V 99,800蟑ゼ 

CZ -850 D ( 15•カラー4050文字 RGBTV ). ¥ 129,800蟀ゲ 

MZ - ID 05 (I ぐカラー2000文字） . V 69,800 -4^ 

MZ-IDlKl 2 ■カラーき 000文字） . ¥ 113,000蟑ギ 

MZHD 15( 14•カラー2000文字) . ¥ 72,000峰ゼ 

テイスクドライブ•ブ 1 J ンタ•他 

CZ -50 IF (5.2 D 、 2ドライブ) . V 129,800岭尹 

CZ -502 F (5.2 D 、2 ドライブ) . V 99,800蟀ゲ 

CZ -503 F (5.2 D、 I ドライブ） . V 49,800蚌ゲ 


m 

-, 

I HBB 


SHARP 
CZ-8PK51 新品同律 」 

(10 インチ漢字プリンタ） 

¥ 129,000_ ¥ 69^800 
门 7- APK 6 I 新同様 I 

(丨5インチ漢字プリンタ） 

v 159,000 ^^89,800 


c^HARp 

MZ -1 P 17( E - B)KS 

(色、グレー•ブラック） 

(80 桁カラー漢字熱転写プリンタ） 

¥76,600岭 F 42,800 

(XI 用ケーブル付） 
¥76,600岭 ¥46,800 
( MZ - 2500 用ケーブル付） 


10,000 

12,000 

42,000 

52,000 

25,000 

18,000 

18,000 

88,000 

20,000 

20,000 

20,000 

45,000 

15,000 

45,000 

18,000 

45,000 

30,000 

52,000 

18,000 

42,000 

18,000 

55,000 

55,000 

32,000 


MZ - IF 07(5*2 D 、2 ドライブ) . ¥ 158,000峰 F 55,000 

CZ -800 P ( 10•ドットプリンタ〉 . ¥ 142,8004ゼ 15,000 

CZ -8 IP (ミニサイズプリンタ） . ¥ 34,800岭 F 10,000 

CZ -8 PP 2( カラープロッタプリンタ) [ gg ]. ¥ 54,800岭 F 15,000 

CZ -8 PD 2( I 0 •ドットプリンタ) . V 79,800峰 F 28,000 

CZ -8 PD 3( I 0 •ドットプリンタ) . ¥ 59,800岭ゼ 28,000 

CZ -8 PNI (80 桁24ドット漢字熱転写プリンタ)…¥ 134,800岭ぎ 32,000 

MZ -80 P 6(80 桁ドットプリンタ) . V 18,000 

MZHP 06(80 桁漢字プリンタ) . ¥ 234,000岭 K 45,000 

MZ - IP 09( mz - i 500 用カラーブロッタプリンタ) [ gg ] …•- ¥ 47,600岭ゲ 25,800 

MZ -1 P 17 . ¥ 76,6004 F 42,800 

MZ -1 P 17 . V 76,600岭ゼ 46,800 

MZ - IT 02( MZ - 2200専用データレコーダ) . ¥ 19,800岭ゲ 6,000 

〇 Z -8 IEB ( X - I シリーズ用拡張 I / O ボックス)¥ 29,800岭 y 12,000 
CZ -8 BM 2( X - I シリーズ用マウスインターフェイス）¥ 19,800岭ゼ 10,000 

CZ -8 RB ( X-I シリーズ用 ROM BASIC ). ¥ 19,800 ¥ 10,000 

CZ -8 SS 2( システムスタンド)「薪"4向様] . ¥ 5,500# K 4,000 

* SHA 闩 P X -1 シリーズ特選極上品コーナー* 

……¥ 69,800蟀 K 16,800 

……¥ 118,000岭 F 59,800 

……¥ 218,000岭 Y 1 02,000 


〇 Z -820 CE ( X - IG /1 0)漸 品同様 I . 

CZ -822 CB ( X - IG /30) fMM«J . 

CZ -880 CB ( X -1 TurboZ ) fl ^ 酬…… 

* SHARP ディスプレイ特選極上品コーナー* 

MD - I 2 PI (12 •グリーン4050文字) ( M 基 M ] ……¥ 39,800岭 F 

CU - I 4 G (ばカラー2000文字)! Mg ]. ¥ 49,800岭 F 

CU -14 A 4( 14••カラー4050文字) [ gg ]. V 89,800^ ¥ 

CZ -820 D ( I 4 •カラ- 2000 文字 RGBTV ) 屬每同樓 J ……V 79,800 岭 F 


02-8800日（15，ヵラー4〇5〇文字闩〇8丁\/)屬每11樣]..-.¥ 109,800_ F 
CZ - 60 0 D ( 1 5 •カラ- 4 0 S 0 文字 RGBTV )! 新晶同樣 I ……¥ 129,800岭 y 


29,800 

29.800 

49.800 

39.800 
86,000 
88,000 


•電話一本で高額下取り、即商品はお手元へ./ 
•あなたの不要になったパソコンを電話一本で 
査定し買取ります。 

♦掲載の商品以外も取り扱っておりますので 
お気軽にお電話下さい。 


▼本社注文デスク 

03 ( 797 、1221 


株式会社パシフィックコンピュータパンク亍150東京都渋谷区渋谷 1-6 -日井上ビル営業時間/ AM 9:30 〜 PM 9:30 年中無休 


全商品保証付 6 ヶ月の保証期間だから安心です。 


クレ ジツ トで OK カレッジクレジットも取扱います。 

全国無料配送 全国どこでも配達料はいただきません。 


日曜配達可 留守の多い方でも安心です。 

高額下取り 少ない予算，で買いかえもラクラク。 


電話1本で即、現金お支払い。 

代金引換元システム 商品到着時の代金支払いで OK 。 


ボーナスー括 払し、 商品は即お手元へ、お支払しヽはボーナス時に。 


本で買无るガ 


超優良中古パソコンが電話 





























































































できうる限りの誠意と責任をもって 


IPLo 


SHA.RR 


XI •68000 

ド 573 , 000 峰 CALL!! 


CZ -600 C (65536 同時発色、スーパーインポーズ、ステレオ fm 音源)…¥ 369,000 

CZ -600 D (扣96色 TVI 9 モード多檐能リモコ M 寸） . ¥129.800 

CZ -21 3 MS(MUSIC PRO 68 K ) . ¥ 18.800 

CZ -214 MS(sound pro 68 K ) . 15.800 

CZ -217 AS (ッインビーシューティングゲーム） . .，•¥ 7,800 

CZ -222 AS (アルカノド.リベンジ•オブ.ドー(プロックゲーム)）一¥ 7,800 

3 M プランクデイスケット (5”2 HD * io 枚) . ¥ 24.000 

CZ -8 NJK ジ^ r 力-ド九ゼント!） . ¥ 0 

安心の 3 倍保証 ( ipl 保 II 害付き） . ¥ 0 

初期不良期間 (ワイドにけ月の交換システム!） . ¥ 0 

標準価格 ¥573.000 


¥ 1,000 


X 72 回ボーナス3.14万父12回 


¥ 2,900 ><72 回 

ポーナス 2.0 万 XI 2回 

¥ 4,000 ><48 回 

ポーナス 2.75万乂8回 

¥ 6,100 X 36 回 

ボーナス 3.0? dx 6(1 



g¥ 545 , 200 蜂 | CALL!! 


CZ -600 C (65536同時発色、 スーパ-ィンポーズ、ステレオ FM 音源)…¥ 369,000 

CZ -600 D (4 O 96 &tvi 9モ-ド 多機能 リモコ >#). ¥129,800 

源平討魔伝 . ¥ 7.800 

スペースハリアー . ¥ 6,800 

マンハッタンレクイエム . ¥ 7.800 

3 M プランクディクケット (5"2 HD * I 0 枚)…… . ¥ 24.000 

CZ -8 NJK ジョィカードブレゼン H ) . ¥ 0 

初期不良期間(ワィドに I ヶ月の交換システム!） . ¥ 0 

安心の 3 倍保証 (ipl 保狂害付き） . ¥_ 0 

標準価格 ¥545,200 


¥ 1,000 


X 72 回ポーナス 2. 89万 XI 2回 


¥ 3,000 ><48 回 

ボーナス 3.075 x 80 

¥ 5,000 ><36 回 

ポ-ナス 3.18万><6回 

¥ 10,100 ><24 回 

ポ-ナス 3.0万父4回 


下取りもご相談〈ださい。 


> XK 68000 aceES 


§¥ 742,670 


CALL!! 


CZ -611 C (20 MHDD 搭載、65536色発色、 FM 8 音源内蔵） . ¥399,800 

CZ -6 11 D (〇 . 31ミリ、アナ a ク3モードオートスキャン） .¥145.000 

(角* 自由自在、 I «» ok !) . ¥ 5.800 

CZ -211 LS(Ccompiie ソフト M 発を効率良くサボート） . ¥ 39.800 

Z's STAFF PRO 68 K (グラフィックッ•■ル）.- . ¥ 58.000 

〇2-8卩〇2(10”ヵラー熱転写85〜84ハガキ可、全角半角文字） ……¥ 69.800 

3 M ブランクデイスケット ( s ”2 hd 1瞅） . ¥ 24.000 

A 4 カット紙 (1〇啪） . ¥ 470 

電話帳電卓プレゼント (《» 科人分•スゲンュ-ル用) . ¥ 0 

初期不良期 (ワイドに I ケ月間交換システム!） . ¥ 〇 

安心の3 倍保証 ( IPL 保 li 害 付き） . ¥ 0 


¥ 3,000 


標準価格 ¥742,670 


X 72 回ポ-ナス4.0573 X 12 回 


¥ 5,000 ><72 回 

ボーナス 2. 85万 XI 2回 

¥ 8,000 ><48 回 

ポ-ナス 3.33万><8回 

¥ 9,200 X 36 回 

ポ-ナス 5.0万父6回 


起低金利 



ス NO.X0763 


§¥ 576 , 600 峰 I CALL!! 


CZ -6 11 C (20 MHDD 搭败、65536色発色、 FM 8 音源内蔵） . ¥399,800 

CZ -6 11 D (〇 . 31ミリ、アナログ3モードオートスキャン） . ¥145.000 

3 M ブランクデイスケット (5-2 HD* I 〇枚) . ¥ 24.000 

源平討魔伝 ... . . ¥ 7,800 

CZ —8 NJ 1 (ジョイカードブレ f ノト!〉 . ¥ 0 

初期不良期間 (ワィト•にけ 月の 交換システム!） . ¥ 0 

安心の 3 倍保証 (ipl 保証害付き） . ¥ _ 0 

標準価格 ¥576,600 


¥ 2.400 


X 72 回ポ-ナス 3.0 万 X 12 回 


¥ 5,000 ><48回 

ポ-ナス 3.13万父8回 

¥ 3,300 


標準価格 ¥877,400 

¥ 8,000 ><36 回 

ボーナス 3.127 DX 6 d 

X 72 回 ポーナス 5.0 万 XI 2回 

¥10,900x24 回 

ポ-ナス 5.0万父4回 

¥ 6,600 X 72 回 

ポーナス 3.0 万 X 12 回 



ス NO.X0764 


§¥ 954 , 670 峰 | CALL!! 


CZ -611 C (20 MHDD 搭败、65536色発色、 FM 8 音源内 *〇 .¥399.800 

CZ -6 11 D (〇 • 31ミリ、 アナロ灼モードォートスキャン） . ¥145,000 

CZ -211 し S(Ccompile ソフト 開発を 効率 良く サポート） . ¥ 39.800 

Z's STAFF PRO 68 K (グラフィックッール） . ¥ 58.000 

CZ-BNSI (フルカ v 似-ム败色ずれの少ない朗次方式ソフト付 M ). ¥188,000 

CZ -6 BN 1 (68000 用スキャナ用パラレルポード） . ¥ 29.800 

CZ -8 PC 2( io ” カラー熱転写 B 5 〜 B 4 ハガキ可、全角半角文字）……¥ 69.800 

3 M ブランクデイスケット (5"2 HD * I 0 枚) . ¥ 24,000 

A 4 カット紙(1〇〇枚） . ¥ 470 

電話帳電卓プレゼント(《«料人分、スヶジュ-ルメ槻 1 M 駙) . ¥ 0 

初期不良期間(ワィトに I ヶ月間交換システム!） . . . ¥ 0 

安心の 3 倍保証 (ipl 保旺書付き） . . . ¥ 0 

標準価格 ¥954. 670 


¥ 4,300 


X 72 回ボ-ナス 5.0 万 XI 2回 


¥ 8,000 X 72 回 

ボーナス2.75万><12回 

¥ 9,200 X 48 回 

ボ-ナス 5.0万父8回 

¥14,200x36 回 

ボーナス 5.0万父6回 



ス NO.X0766 


f ¥ 836,500 峰 CALL!! 


CZ -611 C (20 MHDD 塔載、65536色発色、 FM 音;®内蔵）- 

CZ -61 1 D (0.3 i ミリ、アナログ3モードオートスキヤン） . 

CZ -6 ST 1 (角度自由自在、調節 0 K !). 

CZ -211 LS ( Ccompile ソフト開発を効率良くサポート）… • 
CZ -212 BS (デ-タベ-球乃フフ-通188、镬轨下8卜… 


••¥399.800 
•¥145.000 
••¥ 5.800 
••¥ 39,800 
•¥ 68.000 

CZ -8 PK 8( is " ハガキ!搞可、用紙をずらさないトラクタフィーダ付#) ¥152,000 

3 M ブランクデイスケット (5，.2 HD * io 枚) . ¥ 24.000 

ペー/く— 1 5インチ(5〇〇枚） . ¥ 2.100 

電話幔電卓プレゼント ( tfi 番料人分、スゲン:!-ル/刊 KW 败 ft ). ¥ 0 

初期不良期間(ワイドにけ月間交換システム!） . ¥ 0 

安心の3倍保証 ( IPL 保旺害付き） . ¥ 0 

標準価格 ¥836,500 


¥ 2,600 


X 72 回ポ-ナス 5.0 万 X 12 回 


¥ 5,000 幻2回 

ポ-ナス3.53万父12回 

¥10,000 X 48 回 

ポ-ナス 3.175 x 8(1 

¥ 11,200 X 36 回 

ボ-ナス 5.0万父6回 




TOPICS 


日本テレビ系火曜サスペン 
ス劇場「ハネムーン」/テレビ朝日土曜 
ワイド劇場「黒い仮面の美女 J 。 「日時 
計館の美女」又、フジテレビ系列、月曜 
ドラマランドなど他多数の番組で使用 
するコンピュータプログラムを IP し 


組合せ自由 





ス NO.X0765 


§¥ 877,400 峰 | CALL!! 


CZ -6 11 C (20 MHDD 塔載、 65536 色発色、 FM 8 音； S 内蔵）… 

CZ -6 11 D (3 1 ミリ、アナ a 灼モードオートスュャン） . 

CZ -6 ST 1 (角度自由自在、調節 0 K !) . 

CZ -8 BE 1 A(iMB 増設 RAM ポー K ) . 

CZ -6 VT 1 (カラーイメージユニット、テ a ッバー機能付き）…… 

CZ -8 PVU カラービデオプリンタ） . 

3 M ブランクデイスケット (5"2 HD * I 0 枚)… . 

電話帳電卓 プレゼント (1 B # 群スゲジュ-ルメ •_ 

初期不良期間 （ワイ n こ I ケ月間交換システム!） . 

安心の 3 倍保証 (IPL 保証書付き） 


••¥399.800 
••¥145.000 
••¥ 5,800 
..¥ 35.000 
•¥ 69.800 
-¥198.000 
••¥ 24,000 
•¥ 0 
•¥ 0 
-¥ 0 


.今回掲載の製品は、6月18日より7月18日までの期間に限らせていただきます 


¥ 7,800x48® 


¥12』500><36回 


5.0万><8回 


5.0万父6回 


jP^^HARR / tujin 



ス NO.X0767 


£¥ 215 , 800 峰 1 CALL!![ 

CZ -830 CBK ( xitwin ) . ¥ 99.800 

CZ -830 D ( i 4 •カラー,ビデオ入力 端子 付 さ rgb . a / d 対応在） …….¥ 98.000 
3(^1ブランクディスケット(3.5”2〇〇*1〇枚）_ . ¥18.000 

標準価格 ¥2〗5.800 


¥ 1,000 


X 72 回ポ-ナス1.05万 X 12 回 


¥ 3 jSOO x 48 回 ポーナス 


¥ 4」900 ><36回 


なし 


なし 


["■ ヶ月先から OK 

翌月一括から自由に設定 


_月々わずか1000円 


^^^HARR ^ S = H /± 

f 德¥ 335 , 000 峰 i CALL!! 


CZ -881 C (ビテオス-パ-^-ズ.扣7穴、70ス和 . 

CZ -880 D ( I 4" カラー TV リモコ、パ寸4050文字） . 

3 M ブランクデイスケット (5"2 HD * IOtt ). 

イース II - -- - - 

m 醜羅 ... 

ザナドウシナリオ2 . 

初期不良期 P 3( ワイドに|ヶ月の交換システム!） . ¥ 

安心の 3 倍保証 (ipl 保狂窨 付き） . ¥ 


••¥179.800 
■¥109.800 
_•¥ 24.000 
¥ 7.800 
••¥ 7.800 
¥ 5.800 


0 


¥ 1,000 


標準価格¥335.000 


X 72 回ボ-ナス彳.92万 XI 2回 


¥ 3,000 ><36 回 

ボーナス 2.66万父6回 

¥ 5,000 X 24 回 

ボ-ナス 3.52万父4回 

¥ 4,800 X 60 回 

ポー ナス なし 


全 JMI 無_料_配送 




























































































































































































50,000人もの人々が体感した安心 感。 
信頼の I P & ワンタッチワイドサポート 


•業界初、 IPL でこそ成し得た 3 倍保証。 

メーカー保証12ヶ月の商品なら36ヶ月の保証とグッと長期間の保証を実施。末 
長く安心してご利用いただけるよう、 IPL が成し得たワイドなサポート体制。 

•IPL だからこそ初期不良への保証も万全。交換期間も 1 ヶ月ともっとも ft 期間です。 


プリンタヘッド交換¥ 29,500 以上/ 98 シリーズメインボード交換¥ 21,600 
以上/ドライブ交換¥ 13,200 以上 


INTELGENT POWER 


iPt ニューシヨールームオーブン 

-知的フィールドを実感- 


安心の 
3倍保証 


m 

株式会社•アイビーエル 

亍 248 « 倉 市當ノ下 4-1-12 

S ノ下ビル 

»翕 市 ® ノ下 3-4-23 :商品管》部 



比べてほしいから、ご紹介しま す。 
さらにお買得 IP & クレジット 


• ステップアップクレジットがおトク0 

まず月々1，000円からスタートして2年後から3,000円へアップ。ボーナスも1年後 
1万円。3年後3万円。また夏のボーナスを貯金して冬のボーナスも1年後1万円。 
3年後3万円、また夏のボーナスを貯金して冬のボーナスのみ年一间のぉ支払い 
も OK。 さらにぉ支払い回数も1回払いから最長72回までご自由に設定が可能です。 

•追加購入もクレジットだから便利。 

追加購入も買 L 媸えもご^用中の IPI^ クレジッ降月々僅か1，000円ずつの,调幣で OK。 

•プラスびフェアを実施中•グお買得惑をじっくり比べて下さい。 


Order 

鲁本社 04 B 7-24-7511 •大阪 06-311-2736 

，銀座 03-541-3058 •青山 03-470-0061 •ネし幌011 - BS 1-1444 

籲仙 台022 -2 BB _0531 •広島 08 E _293 -7881•福岡092-481 - EIB 44 

籲商品管理部？ I # 日*の日ごの連雙合せ、0467-24-1154/_ご注文お問合せ 04 B 7-24-1154/ •メンテナンス部会5、#期の不ご良相の% 

• FAX 發發逆—努 g □グ11467 - gklKBl / 籲タイムリーボックス^^號觀装; M 67- g 4-094 V 籲下取りホットライン _7- g 4- gM 0 

本社：〒£48鎌倉市雪ノ下4-卜1£雪ノ下 ビル電話受付: AM 10： 00 ~PMB : 00水曜日定休 

商品管理部：亍248鎌倉市雪ノ下 3-4-2 電話受付: AM 10：00~ PM 8：0 Q 水曜日定休 



UB 日 000 ACE 


NO . X 0770 


§¥637,470峰 i CALL !! 


ス NO . X 0769 


§¥469,400峰1 CALL !! 


CZ-601C (CPU 6800, 2M パイト、 65536 同時発色） ... ¥319,800 

CZ-601D(o.39 ミリ、アナログ 3 モードオートスキャン） . ¥119,800 

CZ-6ST1 ( 角度自由自在、調節 ok !) •……“ .. ¥ 5.800 

3M プランクデイスケット (5_2HD*I0 枚） . . . 24,000 

CZ-8NJ1 ( ジョイヵ - ドプレゼント!） . ¥ 0 

初期不良期間 (ワイト•にけ 月間交換 システム!） . ¥ 0 

安心の 3 倍保証 (ipl 保旺害付き） . ¥ 0 


CZ-601C ( CPU 68000.2 M パイト、 65536 同時発色） . ¥319.800 

CZ-60 1 D(, 39 ミリ、アナログ 3 モードオートスキャン） . ¥119,800 

CZ-6ST1 ( 角度自由自在、 H 節 ok !) . . ¥ 5.800 

CZ-2 11 LS(Ccompile ソフト開発を効率良くサポート） . ¥ 39.800 

Z，s STAFF PRO 68 K ( グラフィックッ - ル） . . ¥ 58,000 

CZ-8PC2(I0" カラー熱転写 B5 〜 B 4 ハガキ可、全角半角文字 ）……¥ 69.800 

3 M ブランクデイスケット (5 k 2 hd * I 〇枚 ) . ¥ 24.000 

A4 カット紙 (mo 枚） . ¥ 470 

電話帳電卓プレゼント (tB# 科 ) 人分フゲジュ -WWK 電糊削 . ¥ 0 

初期不良期間(ワイドに I ヶ月間交換 システム!） . ¥ 0 

安心の 3 倍保証 (IPL 保証害付き） . ¥ 0 


¥ 1,000 


_標準価格 ¥459,400 

X 72 回 ボーナス 2. 98 万 XI 2回 


¥ 3,000 


_標準価格 ¥637.470 

X72 回ポ-ナス3.2万父12回 


¥ 5,000 X 36 回 

ポ-ナス 3.35万><6回 

¥10,000 X 24 回 

ポ-ナス 3.25万><4回 

¥ 4,900 X 48 回 

ボ-ナス 2.0万父8回 


¥ 5,000 X72 回 

ボーナス 2.0 万 X 12 回 

¥ 8,000 X48 回 

ボーナス 2.15万父8回 

¥10,000 X36 回 

ボ-ナス 3.0万父6回 


50,000人 もの人々が体感した安心感】 
. -信頼の IPL ワイドサポート』 


み合せ自由 



OOD CHOICE CORNER 


IPUK 選/ IPL ワイドサポート OK〆 あなたらし差の組み合せを応援しま1"。 


SHARP 



Chance 期間中、システムお買い上けの方、先 

1 着200 名様に電話帳電卓を フレ ゼン 
卜（電話番号 • スケジュールを記情、 
10“ 電卓機能付） 

Chance 期間中、テスクをお莒上けの方全禺 

2 に、 A-300 (原稿用 スタン ト Y 8.00 0) を 

プレセント 




} 

1 

レ匕 UU 

Lax^j 


ヴ編 

Vil 


① CZ-502F (ミニフロッピ-ディスクユニット (2D)) . ¥ 98,000 岭 ¥ 48,000 

② CZ-82FR (増設用フロッピーディスクユニット /CZ-802C 用）……新品 ¥ 59,800 岭 ¥ 28,000 

③ CZ-8BV1 (カラー T メージボード） . 新品¥ 39,800 岭 ¥ 18,000 

④ CZ-8EB3 はクチヨウ 1/ 邮ックス/ XI シリーズ .XI ターボシリーズ）…¥ 33,000 岭 ¥ 18.000 

⑤ CZ-8KR (カンジ ROM/XI.XIC.XICS.XID ヨウ） . ¥ 38,000 岭 ¥ 8,000 

(DCZ-8NM1 (XI turbo 用マウス） . ¥ 13,800 岭 ¥ 6.000 

⑦ MZ-1M08 ( ボイスボード） . ¥ 10,000 岭 ¥ 6.000 

⑧ MZ-8B104 (MZ-2200 • GP •旧インタフェイスカード） . 新品¥ 45,000 岭 ¥ 18,000 

(DMZ-2521 (CPUMZ-252I) . ¥198,000 岭 ¥ 52,000 


⑱ PC- 5,000 (CPU) . ¥350,000 岭 ¥198,000 

⑪XI turbo III セット (CZ-870CB+CZ-870DB) . ¥277,800^ ¥148,000 

⑫ XlFmodellO セット （ CZ.8IICE+CZ-8IIDE) . ¥179,600岭 ¥ 48,000 

©XIF model 10 (CZ-8IICR) . 新品¥ 89,800 岭 ¥ 16,000 

⑭ CLM2P1(12 インチ 0.28 ドット RGB カラー CRT) . 新品 ¥118,000 岭 ¥ 48,000 

⑮ MZ-1P17 (10 インチ 24 ドットカラー漢字サーマルプリンター) . ¥ 79,800 岭 ¥ 32,000 

⑩ MZ-1R05 (MZ-3500 シリーズ用漢字メモリー) . 新品¥ 38,000 岭 ¥ 8.000 

⑰ CZ-112SF(XI 用 NEWBASIC(V2.0) カセット版） . 新品¥ 7,800 岭 ¥ 3,000 

⑭ CZ-122PF(THEYOKOZUNA カセット版） . 新品¥ 15,800 岭 ¥ 6,000 


輸送上のトラブルにも対応 お申し込みはナンバーでお願いします。 


iJurU 已〜し luly.18 













































































































パソコン通信 


CMT _ U でもお申し込みいだだけます。 

^>メ-ルシヨツ 


■シンブルで使いやすいパソコンラック•テスク•チェアー 



パソコンラック S チェアーセット 

ラック寸法幅 600 nm 3 段 棚 
ラック：エレコム DS -10 
チェアー：コイスミし-395 
メーカー 棵準偭格 合 針 44,000円 

セット特 © 23,000円 

•シートカラー ①灣色©茶色 


变ム又テム妇ク 

D ^ ER -1200 

特 №29,000円 


バソコ豸 
エレ〇ム 

j&p 持® 29,< 

幅 120 ox 高さ 650〜1180 奥行 750 mm 



E3B 

エレコム 

PD-0P 

メーフ?一播準®格 43 . 000 円 

J&P 特価19,800円 

コード落とし付 

幅 640 % x 高さ 1305 % x 奥行 7 _ 


-rrr 




エレコム 

PD-99+FO-60E 

セット 
メー; 0 — 欉準 ffi 格合* 151 . 500 円 

J & P 特価33,000円 

トレーュニット ( FO - 60E ) 

をセツトしてお得。 
% x » さ 1280%x 奥行 700 % 


晒 

A ソコンチ: J アー 

キヤスタ_ 

メ 祖格 12.000 円 

円 

4/シートカラー i 

①胄色©茶色 


■パソコンクツズ 



I B® 


ECTil 


◦A 電源タシノ x I / vQn-/iRn 

ナショナル WCH 4511 TV フィルター (14 インチ用） 

ノイスフィルタ-篥中スイッチ付東レ E フィルタ- NEW 14 

j & p 特価9,600円 詡囍所を 



^ QBEI 


j&p 特励6,980円 


5 インチケース 
100枚収納可 
J&P 特価2,000円 


3.5 インチケース 
80 枚収納可 

J&P 特価2,000円 



寺 


鲁 


PS-81T 
10インチブ 1 J ンタスタンド 

J & P 価格3,400円 

*フリンタ 別売 


MS-300 

J&P 特価3,500円 

デイスフレイの角度を 
@由に S 5 S でさます。 


■各種切轚器 



パソコン切替器 

J & P 価格9,800円 

パソコン1一卜_フリンタ 
バソコン2-トノ」ノッ 


QBQ 




ディスプレイ切替器 

J&P 师格9,800円 


バソコン 1 -) 

カラー丨 

バソコン 2- 1 

ク U —ン1 




モデム、 

RS232C 切替器 

j & p 砲格12,800円 

バソ - D、 y モノム 1 
M ノー!ノモデム 2 

KSW M 

1 台の/ V ノコンで 
2 台の R S - 232C « ffi か使え 5 す。 


IBBIISIEga 

BS 


KSW D 8ビン RGB 、 
ク U —ン鏑子付 


X -1 ブ U ンタ切替器 
j&p 価格12,800円 

x-i-r フリン 571 

ハ 1 1ーフリンタ2 

KSW - X 1 

X -1 で2台のプリンタを 
切替えて使えます。 


■電子手幅 

シャープ PA- 7000 
J&P 特価17»800円 

これ1台で、電卓•電話 
帳 • スケジュール • メモ 
• カレンタ■—锇能があり 
ます。別売のモジュール 
を使ろことにより、漠字 
辞霱や英和 • 和英の翻訳 
機としても使えます。学 
生、技術者からビジネス 
フンまて幅広<ぉ使いい 
c だけます。 


CTta 

1 C カード （ PA - 7000用） 



英和•和英カード 
漢字辞塞カード 
6ヶ国語会話カード 
カラオケ歌詞カード 
電話帳•住所録力ード 
販売管理カード 
技術計算カード 


OPA -7 C 1 
© PA -7 C 2 
❸ PA -7 〇3 
❹ PA -7 C 4 
© PA -7 C 10 
© PA -7 C 11 
❼ PA -7 C 12 

周辺機器 

OCE -152 データレコーダ 
© CE -50 P フリンタ 
❸ CE -200 L 通信用ケーフル 


6,300円 

9,000円 

6,300円 

9,000円 

9,000円 

9,000円 

6,300円 


9,800円 

17,800円 

2,500円 


■ポケコン 



PC-E2D0 J&P 特価17,800円 

Z 80 CPU 採用で高速演簞を実現。24桁4行表示 


PC-E500 J&P 特 ffi 24,800円 _ 

充実の 124 関数機能、最大 96 K バイト 
莲て増股可能。40桁4行表示 


■プリンタ 

囑 ^ ^SSmr 

10ィンチヮィャ^ 

CZ -8 PK 9 シャープ CZ-BPC2 

ニキニ，_ 

X -1. X - 68000 用 X -1. X - 68000 用 


さあ始めよ〇パソコン通信 


■ X -1 通價セツト 

モデム: CZ-8TM8 
JBP HOTLINE ： 

スタータキツト 
通偁速度 30( H 200 bps 
僳準価格合計52,800円 
セツ ト晒格49,800円 


■ X -1 ターポ通懦セツト 

モデム：アイワ PV-A1200MKII 
通信ソフト： SPS JET ターボターミナル 
JSP HOTLINE: スタータキツト 
通信速度 30(H200bps 

限準価格合計39.600円セツト®格 39,600円 

■ 3HHF 

































































tVQ d 


國 ^ 



■デイスケット 

マクセル 

OMD2-D(10 枚） 
©MD2-DD(10 枚） 
©MD2-258HD(10 枚） 
©MF 卜 D( 〗 0 枚） 
©MF2-D(10 枚） 
©MF1-DD(10 枚） 
©MF2-DD(10 枚） 
©MF2 吒 56HDnO 枚） 


1,900円 

2,400円 

2,500円 

4,500円 

4,500円 

4,500円 

5,000円 

8,300円 


■ JSP オリジナルテイスケツト 

圓赫 獅― 


«; き谷区道玄圾 2 丁目 28 播 4 咢（〒巧 0) 

»( 03 ) 496-4141 
定休：毎週水曜日 


JSP 才 1 J ジナノレ 
MD-2D(80 枚） 
3,000円 


EBKS1 

隊 MD-2HD(10 枚）2,100円 


MF-2DD_) 

4,000円 



KX -1/ 夕ーポオプシヨン〉 
Q2EI 


■ ■ 

•ド 


FM 音源ポード 

シャーフ CZ -8 巳 SIJ & P 価格 23,800円 
X -1 用8璗和音200音色、ステレオサウンドの FM 音源 


立体 映像 セツト 
らヤーフ CZ -8 BR 1 
v j&p 価格 29,800円 

X -1/ X -1 ターボシリーズにて 
立体映像が楽しめます。 

立体作画ソフト•立体スコーフ<寸 



マウス 

シャーフ CZ -8 NM ? 
J & P 価格 6,800円 
X -1. MZ 用▽ウス 


■ XB 的00オプション 


■ X -1/ X -1 ターボシステムソフト 


OCZ -6 BE 1 

1 N 4巳增股乂モリ 

35.000円 

© CZ -6 BE 2 

2 MB 增股乂モ U 

79.800円 

© CZ -6 BE 4 

4 M 巳增股メモ 1 」 

138.000円 

© CZ -6 BU 1 

11^7トサル I / O ボード 

39.800円 

© CZ -6 BG 1 

GP - IB / K-K 

59.800円 

© CZ -6 BF 1 

RS -232 C 增股2チヤンネル 

49,800円 

❼ CZ -6 BP 1 

68881数値演算プロセッサボード 

79.800円 

© CZ -6 EB 1 

拡張 I / O ボックス4スロット 

88.000円 


■ MZ - 2500システムソフト 


商品名 

機欞名 

価 格 

FORTRAN 

O IP -1213 

13,800円 

C 言語 

© IP -1214 

13,800円 

COB 〇し 

© IP -1215 

13,800円 

LISP 

© IP -1216 

13,800円 

PROLOG 

© IP -1217 

13.800円 

CPM 

© MZ -6 Z 001 

16.800円 


■ブリンタオプション 


OMZ -1 C 48 

X -1 シリーズ用フリンタケーフル 

6.800円 

© MZ -1 C 35 

MZ - 2500/2200/2000用ケーフル 

6,800円 

© MZ -1 R 29 

MZ -1 P 17( B ) 用第2水準 ROM 

14.800円 

© CZ -8 PC 1-3 CZ -8 PC 1 用第 2 水準 ROM 

9.800円 


商品名 

型 番 

価 格 

ランゲージマスター (CP/M80 

OCZ-128SF(2D-5 // FDKS) 

9.800 円 

turbo CP/M (漢字 版） 

©CZ-130SF(2D ， 5"FD 版） 

14.800 円 

X-1 LOGO 

❸ CZ-134SF(2D ， 5"FD 版） 

9.800 円 

turbo Z's STAFF 

❹ CZ-137SF(2D‘5〃FD 版） 

19.800 円 

XI Z's STAFF 

©CZ-138SF(2D 5〃FD 版〉 

13.800 円 

ミュー 

©CZ-139SF(2D.5"FD 版） 

12,800 円 

ワラフィ 、: /C7 ラィフラリー 

©CZ-140SF(2D ， 5〃FD 版〉 

9,800 円 

NEW Z-BASIC 

©CZ-141SF(2HD ， 5"FD 版） 

18,800 円 

©CZ-141SF(2D‘5〃FD 版〉 

18.800 円 

y 

ゲ 

ふ 

シ 

u 

i 

ズ 

FORTRAN 

❿ CZ-115LF(2D ， 5〃FD 版） 

13.800 円 

C 

®CZ-116LF(2D*5"FD 版） 

13.800 円 

turbo LOGO ( 漢锄） 

©CZ-117SF(2D.5"FD 版） 

18.800 円 

COBOL 

©CZ-118LF(2D.5"FD 版） 

13.800 円 

PROLOG 

❿ CZ-119LF(2D 5 下 D 版） 

13.800 円 

LISP 

❿ CZ-120LF(2D‘5〃FD 版） 

13.800 円 

APL 

❿ CZ-126I F(2D.5"FD 版） 

13.800 円 

X-1 NEW BASIC 

❿ CZ-112SF ( カセツト版） 

7.800 円 

❿ CZ-113SF(3 下 D 版） 

8.800 円 

❿ CZ-124SF (2D ， 5 ， FD 版） 

8.800 円 


カラー イメ ー ジ ボード 


シャーフ CZ -8 BV 2 

J & P 価格 39,800円 

画像を自在に修正， 
加工できます 
画像処理 ツール • 

グラフイツクソフト 
同捆 


CTsn 

OCZ -8 BE 2 
J&P 価格 29,800円 

320 K 巳外部メモ IJ 

© CZ -8 BM 2 
J & P 価格 19,800円 

RS -232 C •フウスボード X - 佣 

© CZ -8 EP 
J&P 価格 11,800円 

眩張10ボート (4 口) X -1 用 

© CZ -8 EB 3 

J & P 33,800円 

拡張 I 〇ポックス (4 ス□ット) X -1 用 


I 各種漢字 ROM _ 


OCZ -8 BK 2 
X -1 F 第1水準 ROM 


19,800円 


© CZ -8 BK 3 

X -1 ターボ第2水準 ROM 13,80 on 
© CZ -8 BK 4 

X -1 ターボ2第2水準 ROM 6,800円 


キリト U 樣 • 


おところ m 


□□□□□ 


TEL 


おなまえ 


M 己載以外のご注文ち承りますので、詳 
し<はお霉話にてお問い合わせ下さい。 

0(03)496-4141 

定休：毎週水曜日 


様 


注文 N 0 

数量 

金 額 

X 7 - ( ) 


円 

X 7 - ( ) 


円 

合 計 


円 

お手持ちのパソコン 


お申込み先：東京都渋谷区道玄坂 2 丁目 28 番 4 号（〒彳 50) 渋谷店メールシヨツピンブ係 


fm 


右の注文書にご希 Si 商品の注文 No 
および必要事項ご記入の上、現金 
害留にて dtedf ) 渋谷店までお申し 
込み<ださい。現金受領後、発送 
また、 J&P HOTLINE 会員の方 
は、ショッピングコー^でもお 
申し込みいだだけます。 


お申し込み方法 


Personal Computer Store 


全国無料配達 


メールショッピングのお申し込みは d & P 渋谷店で承ります> 


現金書留申込み用紙 































































































でもぉ申し込みぃだだけます。 

|^| 嫌; HH — ■_ ^ 

JI&IP)tHk / ヨツ 


スーパー大戰路 


注文 Nq 

X 7-100 

適 S 機楢 

X -1 ターボ 

ソフト八ウス 

システムソフト 



プロ野球フアン 



注文 Nq 

X7-101 

適 S 機檯 

X-1 シリーズ 

ソフト八ウス 

日本テレネット 


舂の鬲校野球がスタートす 
るまで务眠でもしよラと考 
えていた野球フアンのあな 
た。さあ、この真新しい球 
欐で白球に賭けた男: c ちの 
ドラフを味わつてみてぐだ 
さい。 


¥7,800(_ 

ワールドゴルフ II 



¥ 7 , 800 ( 5 ^ 20 ) 


注文 No 

X7-102 

適疝搛楢 

X-1 ターボ 

ソフト八ウス 

日本テレネット 


E — ド（トレーニング モー 
卜ーナメントモード)全72 
ホール 檷成。 I ^ーナ乂ントモ 
—ドでは、8+100人のライバ 
ルゴルフ: p —が登讕。あらゆ 
る角度からゴルフのおもし 
ろさを黴底的に分析し、そ 
れをシミユレート。ゴルフゲ 
—ムの最馬峰作品/ 


注文 Na 

タイトル 

ソフト/\ウス 

適师機種 

メディア 

価格 

X 7-103 

レ 1 J クス 

ボーステ:/^ 

X -1 シ■」ーズ 

5〃2 D 

¥7,500 

X 7-104 

信長の野 H (全国版） 

光栄 

X -1 シリーズ 

5^2 D 

¥9.800 

X 7-105 

アルバトロス 

日本テレネ' 

X -1 シリーズ 

5"2 D 

¥8.800 

X 7-106 

殺意の接吻 

リバ-レ'刀卜 

X -1 シリーズ 
X 68000 

5"2 D 

¥5.800 

X 7-107 

棋 太平 

S . P.S 

X -1 シリーズ 

5〃2 D 

¥6,500 

X 7-108 

イース 

日本ファル〕と 

X -1 シリーズ 

5,2 D 

¥7.800 

X 7-109 

ザナドウ•シナ IJ 才 II 

日本ファルコと 

X -1 シリーズ 

5"2 D 

¥5.800 

X 7-110 

ムーンチヤイルド 

HOT-B 

MZ - 2500 

3.5 ，DD 

¥7.800 

X 7-111 

三国志 

光栄 

MZ - 2500 

3.5 "DD 

¥14.800 

X 7-112 

棋 太平 

S . P.S 

MZ - 2500 

3.5 "DD 

¥7.000 

X 7-113 

八イドライド II 

T & E ソフト 

MZ -2000/ 

2200 

5"2 D 

¥6,800 

X 7-114 

レ 1 J クス 

でんば 

X 68000 

5 HD 

¥7.200 


X ホビーソフト 


パワフル麻雀 レジェンド 



注文 No 

X7-115 

遇疝锇檯 

X-1 ターボ 

ソフト八ウス 

CJB ソフト 


注文 No 

X7-116 

適跖機種 

X-1 シ 1 J ーズ 

ソフト八ウス 

クエイサーソフト 


人の心の光と*を司るク ij スタ 
ルを妖稱ア ij ーナガ誤つて地上 
に落してしまつだ。そのクリス 
9ルを手に入れだのは古しえの 
時代に神々をち滅ぼそラとした 
大 M 王ガウディアであつた。 


反生命戰機アンドロギ：びス 



¥7,800(5 # 2 d ) 


注文 No 

X7-118 

適応篏 M 

X-1 シ U —ズ 

ソフトハウス 

日本テレネヅト 


'•アンド□ギユヌス"その名は「両性 
颺两 4 在*味する。だかお a えはいつ 
35い何#なのだ*?「人閜°?そ n とち 
»<««? _• ••女性*?それとも男性」「恿 
*9 それとち《世主唯一はつぎ 
〇していることは、お前に与えられ 
た使命「宇宙肚■ヲ企6半物霣瞿'•ウ 
ルド*夺級壞せョ」，？?ンド□ギユヌ 
ス*よ、お*!:は*だ目分か何《て35る 
か知らない， 



Might and Magic 


¥9,800(5, 


注文 No 

X7-119 

適応搛攫 

XI ターボ 

ソフト八ウス 

スタークラフト 


薄暗いダンジョンから足を 
一歩跑み出すと、そこには 
字つすぐに延びた並木道が 
あつた。我がバーテイーの 
前途には、「バーン」という 
名のみ知られている未知な 
る世界が広がつている。か 
<して旅は始まる。 


蒼き猿と白桃■ジンギスカン 



¥9,800(3.5" dd ) 


注文 Nq 

X7-117 

適応搛欞 

MZ- 2500 

ソフト八ウス 

光栄 


「蘆 S 狼と白き！} fc 鹿 j の壮スなストー 
IJ 一に加え、モー K では明馬嫌 
や弓矢味など新し<加えられ C 戰 H 
部隊や略奪、狩揪、降伏勘®などの 
新コマンドも加わつて、より複雄な 
败略が楽しめるシ5ユレーシヨンゲ 
ームとして期待でさる。 


ジーザス 



¥7,800(5,2 d ) 


注文 Nq 

X7-120 

適応機楢 

XI ターボ 

ソフト八ウス 

エニックス 

八レー 8* か® i£ 

t しつつあつた西 JB 


2061年、人類がハレー B 1* HI のた 
めに飛ばした2概の有人探囊《を》 
台に、これ*でに経！*できなかつた 
よラな感動のドラ7を、い*バソ D 
ンの AGV として体»で S るときか 
やつてきだ。 


% 注文 Na 

タイトル 

ソフトハウス 

適応機種 

メディア 

価格 

X 7-121 

ゥィザード IJ 一 3 

アス^- 

X -1 ターボ 

5〃2 D 

¥9.800 

X 7-122 

サジ U 

日本ルネ、 

X -1 ターボ 

5"2 D 

¥7.800 

X 7-123 

魔界復活 

ソフト WING 

X -1 ターボ 

5"2 D 

¥7,800 

X 7-124 

ダ•ビンチ 

HAL 研究所 

XI シリーズ 

5"2 D 

¥6.800 

X 7-125 

ディーヴァ 

T&E 

XI シリーズ 

5"2 D 

¥7,800 

X 7-126 

ウルテイ ▽ IV 

ポこ一 

X -1 シ U —ズ 

5"2 D 

¥9.800 

X 7-127 

蕭き狼と白き牝鹿 
ジンギスカン 

栄光 

X -1 シ，」ーズ 

5〃2 D 

¥9.800 

X 7-128 

スーパーレイドツク 

T&E 

X -1 シ U —ズ 

5^2 D 

¥6.800 

X 7-129 

K — 

システムサコム 

X -1 シリーズ 

5^2 D 

¥9.800 

X 7-130 

ガイフレーム 

NCS 

X -1 シリーズ 

5 # 2 D 

¥7,800 

X 7-131 

抜忍伝説 

71^71^ 

X -1 シ U —ズ 

5"2 D 

¥9.800 

X 7-132 

ドラゴンバスター 

デンバ 

X -1 シリーズ 

5,2 D 

¥6,200 

X 7-133 

ラビリンス 

日本 AVC 

X -1 シリーズ 

5 "D 

¥7.800 

X 7-134 

夢幻戦士ヴァリス 

日本ルネ、:^ 

X -1 シリーズ 

5^2 D 

¥7.800 

X 7-135 

ストーム 

マイク 

X -1 シ U —ズ 

5"2 D 

¥7,800 

X 7-136 

ブロフェツシヨナル麻雀 

シヤノアー J レ 

X -1 シリーズ 

テーブ 

¥4.800 

X 7-137 

ガルフォース 

スキッ> ラスト 

X -1 シリーズ 

5 "D 

¥7.800 

X 7-138 

カーフイン 

マイ 

X -1 シ u - ズ 

5〃2 D 

¥7,800 

X 7-139 

麻雀狂時代 

マイク 

X -1 シリーズ 

5^2 D 

¥6.800 

X 7-140 

女神転生 

日本ルネ、 

X -1 シリーズ 

5^2 D 

¥7.800 

X 7-141 

上 海 

システム、刀卜 

X -1 シ•」ーズ 

5 # 2 D 

¥6.500 

X 7-142 

うる星やつら 

マイ 

X -1 シ U —ズ 

5 y 2 D 

¥6.800 

X 7-143 

ギヤンフラー自己中心派 

づ 一 UP —、)) 

X - 1シ•」ーズ 

5"2 D 

¥6.800 

X 7-144 

めぞん一刻 

マイ 

X -1 シリーズ 

5,2 D 

¥6.800 

X 7-145 

九 玉 伝 

テクノソフト 

MZ - 2500 

3.5 T)D 

¥7.800 


|*(班)は新作ソフトの略です。| 































































































































































■ X ホビーソフト 

注文 Na 

タイトル 

ソフト/\ウス 

適)®機種 

メディア 

価格 

X 7-146 

リ M イノ'?一 

アルシスソフト 

MZ - 2500 

3.5 〃DD 

¥6,800 

X 7-147 

ウィバーン 

アルシスソフト 

MZ -2500 

3.5 〃DD 

¥6,800 

X 7-148 

殺人クラブ 

リバーヒル 

MZ - 2500 

3.5 〃DD 

¥7.800 

X 7-149 

ドルアーガの塔 

デンバ 

MZ - 2500 

3.5 "DD 

¥6,800 

X 7-150 

スペース八リア 

電波新聞社 

X 68000 

5〃2 D 

¥6.800 

X 7-151 

ゼビウス 

デンバ 

X 68000 

5"2 HD 

¥6.800 

X 7-152 

ザ•コックピット 

コムバ 

X 68000 

5"2 HD 

¥6.800 

X 7-153 

上 海 

システム、卜 

X 68000 

5"2 HD 

¥6.500 

X 7-154 1 

アルカノイド 

シャーフ 

X 68000 

5"2 HD 

¥7.800 



ールシヨツピンクのお申し込みは渋谷店で承ります 


全国無料配達 


注文 Nq 

タイトル 

ソフト/ \ ウス 

適応機檯 

メディア 

価格 

X 7-165 

C comoller 

シャーブ 

X 68000 

5 A .2 D 

¥39,800 

X 7-166 

MUSIC 

シャープ 

X 68000 

5〃2 D 

¥15.800 

X 7-167 

サウンド PR 〇 68 K 

シ v - フ 

X 68000 

5〃2 D 

¥15.800 

X 7-168 

LINKS 68 K 


X 68000 

5〃2 D 

¥19.800 

X 7-169 

日本語 MY CARD * X 1 t 

アバ□ン 

X 68000 

5〃2 D (2) 

¥58,000 

X 7-170 

ビジレス m 

OA テッ^ 

X 68000 

5"2 D 

¥68,000 

X 7-171 

HuCAL 日本語 

八卜 V ン 

X 68000 

5〃2 D 

¥45.000 

X 7-172 

M u 11 i d 1 a n 

シャープ 

X 68000 

5 y 2 D (2) 

¥49,000 


SUPER 春望 n 


適 疝 《 檯 

X -1 ターボ 

ソフト八ウス 

デービー ソフト 


日本腰ワープロ「将顆 J 


通喵檐檯 

X -1 ターボ 

ソフトハウス 

シャーブ 


Inkpot 


Kl 也は ■ 


適 g 檐裀 

X -1 ターボ I 

ソフト八ウス 

アスキー 


遇 S 拽樋 

MZ - 2500 I 

ソフト八ウス 

デービーソフト| 




高性能ワープロソフト8ビット 

の® 

(5"2〇) ¥34,800 


▽ウスでお絵かき、ク•ラフイツ 
クソフト 


(5 # 2 D ) 


¥20,000 


グラフィック楢能も内應日本語 
ワープ□ソフト 


(3.5 # D ) 


¥34,800 


裹性能日本两ワープロ 

即戦力 Samurai ( 侍） fsem JET ターボターミナル 


遇応檐 ■ 

X -1/ X -1 ターボ 

ソフト八ウス 

サムシンクグッド 


適疝檐禰 

XI ター ポ 

リフトハウス 

エス•ビー•エス 




クラフィック後能も内®日本語 
フーフ□ソフト 

(3.5 # 〇) ¥34,800 

SUPER 春望 ]! wm 


基本性能霪視の日本語ワーブロ 
ソフト 

(5,2 D ) ¥19,800 

Win DEX Esem 


オート□グイン • オートタイヤ 
ル檐能高性能通《ソフト 

(5"2 D ) ¥9,800 

ブリントシヨツブ Esem 


適 S 檐楢 

I X -1 ターボ 

ソフト/\ウス 

1 ジ エー•イー •エル 1 


通応搛 <1 

X -1 ターボ 

ソフト M ウス 

フ□づバンドジャパン 




3_ 




フロフェツショナル 
▽ルチウインドウエディタ 

(5"2 D ) ¥28,000 

■ キリトリ棟 ■ ■ ■ 


楽しい印刷ソフト 

(5"2 D ) ¥12,800 


♦記載以外のソフトのご注文ち承ります 
ので、詳し<はお電話にてお問い合わ 

せ下さい。 0(03)496-4141 


おところ 


添□□□□口 


TE し 


おなまえ 


様 


注文 Nog ィィス S) 

数量 

金 額 

X 7 - ( ) 

本 

円 

X 7 - ( ) 

本 

円 

X 7 - 

本 

円 

一合 一計_ 1 

本 円 

お手持の機種名 



お申込み先：東京都渋谷区道玄坂2丁目28番4号(:〒150渋谷店メールショッピング係 


右の注文霪にご希 is 商品の注文 nq 
および必要事項ご記入の上、現金 
霧留にて渋谷店までお申し 
込み<ださい。現金受領後、発送 
また、 J&P HOTLINE 会員の方 
は、 ショッピング コーナー でもお 
申し込みいだだけます。 


お申し込み方法 



■ビジネスソフト 





の\ 


•\ベ B >匕ヒハ.ニバブパ-、中ケ 

N •• 〇 • • • t • • • t? • • 


へ fofivfii 扭 ap 

rr*_il_al!? 

k ? r£J 


き 



現金書留申込み用紙 































































































































A 腕 ESS 


forXK 68000 


XKI 7 エミュレータ 

定価 ¥9,800 



XI エミュレータは X 1 シリーズのアプリケーションソフトを X 6800 □上で実行して頂くための 
ソフトウェアエミュレータです。 XI のアプリケーションを完全にソフトウェアのみでエミュレート 
しているため、実行速度は平均3〜5倍程度遅くなりますが、今まで XI 上でお使い頂いていたアプリ 
ケーションが Human 6 日 k 上でお使い頂けます。 

X 680 □□では XI ソフト (5 M 2 D ) のメディアを取り扱うことができませんので、付属の専用ケー 
ブルを接続して XI ソフトを Human 6 日 k のディスク上にファイル転送し、そのファイルを参照して 
ェミュレートを行ないます。 Human 68 k 上に仮想的に XI のドライブを作りますので、 XI で使用 
しているイメージのままお使い頂けます。 

XI と X 6 日000間のファイル転送用ユーテイリテイを用意しておりますのでたんにフアイルコン 
バータとしてもお使い頂けます。 


mmmm xi シリーズ用実行可能アプリケーションソフト 


* プロテクトの施してあるソフトは実行 
でぎません0 

* 一部サボートしていない機能があります。 
* 原理上実行で吉ないソフトもございます。 



• BASIC 

• LIPS 
•PASCAL 


• CP/M dLOG 〇 
•COBOL 參 FORTRAN 

• FORTH # C …… etc 



CONCE 闩 TO - X 6 日 K は、 X 6 日□□□上で MS - DOS のアプリケーションを 
お使い頂くための MS - DOS エミュレータです。特定機種用と限定されていない 
お手持ちの MS - DOS 用のソフトでしたら X 68 □□□上でお使い頂けます。また、 
MS - DOS ( Ve 「2.11) をお持ちの方は、それに付属の COMMAND . COM を 
起動することにより MS - DOS 上で作業しているのと同じイメージで、つまり 
X 68000 を疑似的に MS - DOS マシンとして使用することができます。 CONCERTO - 
X 68 K は X 6 日000の世界をより一層広げることをお約束致します。 



CONCERTO - X 6 日 K 用 

DOS Engine 

( V 30 CPU ボード） 


[特長] 

•日 MHz の V 3 □を使用 
籲メモリは 512 kByte 搭載 
• オプションで日 087 NDP 実装可能 

♦ボードは本体より I 2 cm 程度大きくなります。 
その部分には力/ <一がつきます。 



!- MS-DOS ( VE •丨 1) の 
COMMAND.COM を起勦 
します。 

J-MSmEMO. BAT という 

パッチファイルを実行します。 
このパッチファイルは MS- 
C のソースプログラム SAM 
P し E . C をコンパイル • リン 

*" 行守 ,+ れ > M*.. [(1)：, 
HfiMi フ .r ィパ -r; 八 f/r し 

.I d 人 i . I - : ' ! 

-任*のキーを押すことによ〇 
画面に文字列を表示します。 


■ MS - DOS 用実行可能アプリケーションソフト 


• MS-C 

參 MS-FORTRAN 

• MS-PASCAL 

• MS-LINK 

• MS-BASIC 


春し attice C 

• Oputimizing-C 
•TURBO PASCAL 
• Plink 86 

• etc …… 


MS - D 〇 S エミユレータ 定価¥99,800 

C0NCERT0-X68K 



* MS - DOS はマイクロソフト社， CP / M はデジタルリサーチ社の商棵です。 

C 0 MMAND . COM は MS - DOS に播準のコマンドプロセッサです)上記のソフトウェアは各社の商標です> 
* 製品の仕様、名称は予告なく変更する場合もございますのであらかじめご了承ください。 


囍アクセス 


〒丨〇丨東京都千代田区神田神保町卜64 
神保町協和ビル 7 F 
003 (233) 0200代） FAX . 03 (29 I ) 701 9 
































できれば、 

ラベ/レを貼りたくない 


新聞と雑誌と郵便局と、クラブとソフトと百科事典と。 
J&P HOT LINE は、そんな「家の中に置いて 
おきたしヽ便利さ」をノ \°ック詰めにした 
未来の缶詰。いままで一度には 
できなかつた楽しさを食事の 
あとの一時間にも、自由に選 
んで満喫できます。 

いろんな便利を 
つめこんだから、 

できればラベルは 
貼りたくない。 

パソコン通信 
J&P HOT LINE 。 

これから、まだま 
便利になります。 




♦週刊クリッビングニュース參新刊書籍情報籲株式情報 
參株価データ （ CUG で提供）参パソコンソフト新作情報 

©固^ 哲 @ 

•オンラインショッビング / HOT LINE 特選ショッピン 
グ（ワープロ •パソコン *AV •家電)/有名百貨店特選ショ 
ッビング(お中元•お歳暮時）❿新車•中古車情報 

獅圍齡弓 

籲仲間専用の郵便局/各種多彩な SIG * さまざまな話 
題に対応できる、独自の構成の BBS (電子掲示板） 

獅臓酬麵丽@ 

•ワープロ文書を即送信/電子メール機能（グループ送 
信•送信済メールー覧•読了確認機能装備） 

MQS ^ Cr > W @ 

•自作ソフトを大公開/ SIG . X - M 〇 DEM •イラストも送 
れる NAPLPS 画像通信•ソフトフォー厶集サービス 

• 生活情報〔遊 ing 〕 •ライフステーション春電子レンシ 
教室•オンラインマガジン PC - W 〇 RLD •ゲーム&ク 
イズ 


アクセスポイント全国89力所// 


1200 bps /300 bps サボートポイン 


東京•大阪•名古屋•礼幌•苫小牧•青森 
仙台•山形•水戸•土浦•鹿島•大宮•船 
橋•平塚•甲府•千葉•立川•川崎•横浜 
静岡•新潟•金沢•京都•神戸•岡山•広 
島•徳島•高松•松江•福岡•長崎•鹿児 
島•横須賀 

旭川* 


函館•八戸•盛岡•秋田•米沢•福島•い 
わき•郡山•宇都宮•前橋•高崎•太田 • 

熊谷•八王子•富山•高岡•石川•福井 • 

長野•松本•誕訪•上田•浜松•沼津•岐 ： m - ra 

阜•大垣•津•四日市•大津.奈良•和歌：| g 号 （ 」 

山•頌•貝塚•尼崎•姫路•米子•福山•津： —— 

山•呉•下関•徳山•宇部•山口•新居浜 • ： f 

松山•高知•北九州•佐賀•熊本•大分 • \ ぉ上| .スタ-タキ.ノト(ソフトな 

宮崎•浦添•豊橋•久留米•佐世保 ： I 申 品 I ¥3,000 _ 

參ハソコン通信ネツトワークサービス 

d»&IP> GMT ™ 




■申込先 

〒556大阪市浪速区日本橋 5-6-7 
上新電機株式会社 
J&P HOT LINE 事務局 
TEL . (06) 632-2521 
■利用料金について 

入会金/3,000円（スタータキット瞄入の代金から充当されます） 

接続料/3分あたり20円(アクセスポイントまでの電話代は含みません） 


スタータキツト申込書 


お 

i 


お番 

屯 

話号 

() 

1 

〒 

器 

b ( D スタータキソト（ソフトな し） 

i ¥3,000 


▼万全のサポート体制で全国をネットする 

渋谷店東京都渋谷区道玄坂2丁目28番4号 0 ( 03) 496-4141 
印田店東京鋼田市森野1丁目39番16号 
八王子店東京 8 A 王子币觸 II 香王子そごう ? F 
テクノランド大阪市浪速区日本椹5丁目6番7号 
メディアランド大阪市浪速区日本橋5丁目8番26号 
コスモランド大阪市浪速区難波中2丁目1番17号 
ワープ□ランド大阪市浪速区日本摄4丁目9115号 
ビジネスランド大阪市北区梅田 H -3 大隨 II 第3ピル於 
阪急三番街店大阪市北区芝田卜 1-3 阪急三番街 
高機店高槻市高槻町 H 番16号 


パソコンの 大型専門店 说职 チヱ ーン 


a 0427)23-1313 
a 0426)26-4141 
〇 06) 634-1211 
〇 06) 634-1511 
a 06： 634-3111 
〇 06； 634-1411 
a 06) 348-1881 
a 06) 374-3311 
0(0726)85-1212 


<ずは店 
千里中央店 
摂津當田店 
寝屋川店 
藤井寺店 
岸和田店 
京都寺町店 
京都近鉄店 
姬路店 
和歌山店 


枚方市楠葉花園町15番2号 
罝中市新千綱1-3-沏千里サンタウン 3 F 
高槻市大畑町24 - 10 
寝屋川市緑町4 - 20 
藤井寺市岡2 丁目1番33号 
岸和田市土生町 2415-3 
»^区_臟寺下ル^ IM 49 
禱下京区烏丸通七条下臟小麵 
挺肺 M 末汀目墦&姓命_ビル IF 
和歌山市元寺¢4 丁目4番地 


a 0720)56-8181 
0(06) 834-4141 
n (0726) 93-7521 
0:0720)34-1166 
0 0729 )38-21 11 
n 0724;37-1021 
01075 '341-3571 
n 075)341-5769 
n 079272-1221 
a 0734; 28-1441 





















SHARP 農 




パソコンテレビ 


加 ZI 


new z - basic 搭載 


多色グラフィック、カラー画像デジタイズ、ステレオ FM 音源、バンクメモリ 
対応などクリエイティブワークを強力にサボートする AV 指向の高水準 


巳 ASIC です。グラフィック用関数、 X 68000 と命令コンパチの拡張 MML 


をはじめ使い込むほどに凄さがわかるパワフルな BASI 〇を搭載しました。 


■■■1 先駆の av アート機能 mmm 

量子化、モザイク、反転などトリック取り込み処理をサポートしたカラー 
画像デジタイズ機能標準装備。さらに、クロマキー合成、インターレース 
スーパーインポーズ、4,096色対応ニューテロッパ機能、8重和音のステ 
レオ FM 音源。先駆の Z アビリティがパソコンクリエイターを魅了します。 
♦ メインメモリ 128 K 巳標準実装 （NEW Z - BASIC で最大 576 K ノ、<イト 
までサボート）した大容量設計 •1 M バイトフロッピー2基搭載 *JIS 
第1/第2水準準拠漢字 ROM 、 「システム•ユーザー辞書」標準装備春マ 
ウス標準装備* XI 夕ーポシリーズの豊富なソフト資産が活用できる 
コンパチブル設計*多彩な通信ツール*のサポートでパソコン通信に 
対応 • ドットピッチ 0.31 mm の高精細カラーディスプレイテレビ* *別売 


本体+キーホード 

CZ -881 C - BK (ブラック） 

標準価格179,800円 

14型カラーテ V スプレイテレビ 

CZ -880 D-BK (ブラック） 

標準価格109,800円 

14型カラーテ V スブレイテレビ 

〇 Z -830 D-BK (ブラック） 

標準価格 

98,000円 

チルトスタンド 

CZ -6 ST 1- B (ブラック） 

標準価格 

5,800円 


余写輿のディスプレイは CZ -880 D です, 




ダ fr - y 。 株式会《 


•お問い合わせは •••シャープ ㈱ 電子機器事業本部システム機器営業部〒545大阪市阿倍野区長池町22番22号 0(06)621-1221( 大代表） 
電子機器事業本部テレビ事業部第4商品企画部〒162東京都新宿区市谷八幡町8番地 0(03)260-1161( 大代表） 


T 491 0217907541 雑誌 02179-7 



















